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الفيحجوال ستوديو 2006 آخيرا و صل 


مقدمة إلى التقنيات القادمة مع الفيجوال ستوديو 2006 
نظلرۃ سریعہ علی تقنیہ Linq‏ 


موقع فيجوال بيسك للعرب 


جديد الفيجوال بيسكت 2008 


الاستدلال المحلى على النوع 


ملف العدد الطرق الموسعة 


إعداد الفيحوال ستوديو 20086 لتنقيح و مشاهدة شفرات مجمعات 
إطار العمل .نت 


تطوير تطبيق متعدد الطبقات N- 116٣‏ 
شرح معظم الدوال البرمجية الموجودة في الفيجوال بيسڪ 
أحداث التطبيق في الفيجواJ‏ بıسڪك‏ .نت Application EV@nİS‏ 


يعض الآمور الآساسية في موضوع الرسم في الفيجوال بيسڪ .نت 


جوبع الحقوق وحقوظة (ء) 2008 


اوحاو ی ت 


مدير الوجلۃ/ الئستاذ عبد اللہ العتيق شاركنا في هذا العدد 


رئيس التحرير: وليد بوالطمين. وحود سامر ابو سلوء 
گربق ١‏ العدد: تركي العسيريىء 
ومصطفی محوود. نورهان عادل» نبهان نور. أحود بدر 


رغید طیب. 


المقا عصام حنفي. 


تحدا ۴ النظ نجيب الوجيدیى. 


ِ وحود جمال الدین. 
لحه اله ال سڪ .نت 


وصطفى إسواعيل. 
لغه السي شارب وحود النبهانى 


بيغة الدوت نت العام تطالعون فى هذا العدد 


اة اا وال ك 0 
تطویر تطبيق متعدد الطبقات ١ء116 N-‏ 


استراحه القارئ Application‏ 

ملف العدد جديد الفيبي 2008/الطرق الموسعة 

ارا و ات ماكر وو Extension Methods‏ و الاستدلال الوحلي 
قو اعد البيانات العام على النوع 

شرح وعظم الدوال البرمجية الموجودة في الفيجوال 
أخبار المنتدى 


مسانقات المتتدى 


وشاريع الأعضاء المويزة 


المسروع الفائز بالوركز الأول فى بوم الهندسة lالإصرڪ Traffic -EÊE—D‏ 
Monitoring System Model‏ | 
| 


المسابقات الشهرية للموقع و نتانجها 
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مجلة شهرية مجانية تصدر عن موقع فيجوال بيسك العرب A‏ 5 


متاحبہ الحدد 
DEI‏ کی ا 


Col‏ م ر ا 
الحمد للہء والصلاة والسلام علی ودود بن عبد اللہ و على الہ وصدبہ ومن والاه... أها بعد. 


بفضصل من اللہ تعالى. وبتوفيق وسداد منہ عز وجل» يقدم منتدى فيجوال بيسك. الموقع العربي 
الأول الوتخصص في هذه اللغة للقارئ العربي العدد الأول من موجلتہ الدورية والتي نامل أن تكون 
موافقة لطموحات محبي هذه اللغة عموما و أعضاء وزوار المنتدى خصوصا ٠‏ والتي جاءعت بالعديد 
من الموضوعات والفوائد المتفرقة إلى جانب التسلية والترفيہ لتضيف لمنتديات اللإنترنت بعضا ٠‏ 
ون الزاد العلمي والتثقافي الذي يبحث عنہ رواد هذه المنتديات. ٣‏ 


و يفوتني بهذه و أن انوه إلى النجا الكبير الذي حققہ الونتدى خلال فترة وجيزة ون 
وتجاوز عدد لزوار الیووی الفي زائر ٠‏ وكل هذا يدل على حجم الفراغ الذي يسده المنتدء في مجال 
تخصصہ على سبكة الانترنت و المواقع التعليمية العربيۃ. 


وباسم إدارة موقع فيجوال بيسك للعرب وباسم مشرفیٰہ واعضساءہ اتقدم 
بالشكر الجزيل وبالدعاء بالتوفيق لفريق التحرير لمجلة منتدى فيجوال بيسك بقيادة الأستاذ وليد 
بوالطمين والذي بذل الكثير من جھدہ ووقتہ - جزاہ اللہ خيرا - ليظهر هذا العمل للوجود. 
و كذلك لكل ون الذخوة الكرام مصطفى محمود. وانل» نبهان نور نورهان عادل» هاني كما الا 
أنسى أن أشكر الأستاذ الوهندس أحود جرال المشرف العام على المنتدى والذى قام بدعم هذا 
الفریق و وفر لہ کل ہا یحتاجہ من إمکانیات و توجیہ. 


وختاما أتقدم بالشكر الجزيل لجميع مشرفي وأعضاء و زوار منتدى فيجوال بيسك 
جميعاً كل حسب جهده ومشاركتہ في المنتدى. فهم الوقود الحقيقي لنشاط المنتدى وهم 
ر سر نجاحہ وتفوقہ. املين من اللہ عز وجل أن يشارك الجميع في تطوير المجلة و المشاركۃ 
ر في إنمانها ليعم الخير على جميع المبرمجين العرب . 


أخوكم / عبد الل العتيق. 
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Studio 2008‏ اVisua‏ آخیرا وسل 


قامت شركة مايكروسوفت بتاريخ 2007-11-19 بطرح الإصدارة الجديدة من فيجول ستوديو والتي تحول الاسم 


Visa] Sاu‎ d10 2008‏ والتي تتضون العديد من التحسينات على صعيد بينةۃ التطوير ولغات البرمجة كها رافق طرح هذه 
الإصدارة الجديدة طرد إصدارة جديدة من إطار عمل 3.5 k٣اwoعصaحا۴‏ اeل.‏ وتوجهت هذه النسخة الجديدة لتطوير مجال 
واسع ون التطبیقات بدعا بتطبیقات الویب ورورا بالتطبیقlاGٽ‏ llلخlصۃ‏ ب Windows Server g Windows Vista‏ 
2008 وانتهاء بنظام 2007 01٥٥‏ ومنصات آخری کدعم × ز۸ فی تطبیقات .1۸٥‏ ۸5۶ مثلا. 


حيث قدمت هذه الإصدارة من فيجول ستوديو روية مايكروسوفت عن تطبيقات الزبون الذكية ومكنة المطورين من بناء 


تطبيقات متصلة بسرعة بنوعية عالية وتجربة مستخدم غنية. فمع هذه الإصدار الجديدة ستجد المنظمات أن الوصول اللمعلومة 
وتحليلها أصبح أسمل بكثير وها قبل ممكنة إياهم من اتخاذ قرارات موثرة قيما يتعلق بالعمل فهي توكنهم من إنشاء تطبيقات 
أكثر أهنا وإدارة و موثوقية بسرعة اكبر هذا وع الاستفادة الکاملۃ من جوıع‏ ,ljتٽ Office 2007 g Windows Vista‏ 


ويوكننا سرد بعض التطويرات على مستوى بينةۂ التطوير في هذه الإصدارة الجديدة: 


إوكانية تهجير الإعدادات من الإسدارة 2005 إلى الإصدارة 2008 

عند إنشاء Community Components‏ روكنك تحدید فیھا إذا كانت ستعمول على 2005 أو 2008 أو كليهما 
la‏ 

إضسافةۃ دعم ل Ajax Development‏ لدعم الخدمات التي تعمل بتقنیۃ ×هزA۸‏ 


Windows Presentation Foundation (WPF) Applications pea‏ وذلك من خلال تطبیقات 
g WPF Custom Control Library g WPF Browser Application g WPF Application)‏ 
(WPF User Control Library‏ 

دعم e1۸3‏ titargاMu‏ التي توكنك من كتابة تطبيقات تعمل على أكثر من فريم وورك (2.0 و 3.0 و 3.5) 
تحسينات على النشر بتقنية 1]1cK01۸٤٥٥6‏ التي أصبحت تدعم تطبيقات W٣‏ والتواقيع الرقميۃ Applicati0¬ J‏ 
Manifest‏ و ال Manifest‏ الخاصة ب 04۸€ هاV1s‏ ودعم إصسدارات الفريم وورك المختلفۃ 

إوكانية كتابة cascading sاtyاع sطععأك )C8S(‏ مع الذدوات الخاصة بدعوها 


E 


Studio 2008‏ اVisua‏ آخیرا وصل 


6 إ|زضlفة IntelliSense for Jscript and ASP.NET AJAX‏ محود سامر ابو سلو 
إمكانية فلتره موسها8 1ءهزط0 لإظهار المعلومات الخاصة بأي فريم وورك نريدها فقط وكذلك تحسين البحث فيه ليستهدف نسخة معينة من 
الفريم وورك 


تقدیم Design‏ 0/۸ الذي يساعد المطورین عند تطویر اغراض ا و اې؟ و اې؟ هځ ٣اا‏ 

TableAdapterManager pia, Dataset Designer ”آle تحسينات عة‎ 6 

ه تقديم لغة الاستعلامات المضمنة و1 الني أضافت لفيجوال ستوديو وبخاصة لغتي C#‏ و ءأئج8 اهںءا۷ إمكانيات استعلامية قوية على العديد 
من الأغراض مثل المجموعات والمصفوفات والفئات و sعوةطة†ة0‏ اوك و 01× وقواعد البيانات 

A۲ التي تمكن التطبيقات المعتمدة على ويندوز من الوصول السهل ل عم.‎ Cاient‎ Apماication‎ Services تقديم‎ ٠ 

ه تقديم نوعان جديدان من مشارuع‏ llتتlرıر ASP.NET Reports Web Site Template s Reports Application Template‏ و تقدیم 
)× کنوع بیانات جدید 

ه٠‏ تقديم اهما اءعزط0 التي تمكنك من تعريف وتحديد خصائص غرض معقد ضمن تعبير واحد و بدون استدعاء واضح للباني وتستخدم 
ارا مور ات ن ال راء اررق والمخورلة 

ه تقديم الأنواع المجهولة sممرآ‏ usمصرمم”:‏ التي تمكنك من إنشاء الأغراض ءاءعزط0 بدون كتابة تعريف فة اا۴ مل كا٤‏ من أجل 
نوع البيانات وعوضا عن ذلك يولد المترجم الفئة من أجلك ولن يكون للفئة اسما قابلا للاستخدام حيث تكون هذه الفئات موروثة مباشرة من 
tءعزط0‏ وتمتلك الخصائص التي تحددها عند تعريف الغرض 1ء٥‏ زط0 وبما أن نوع البيانات لم يتم تحديده يتم الإشارة إليه على أنه نوع مجهول 
.type‏ 

ه الاستدلال المحلي على النوع عع"عاءما عممرآ اهعم1: يستخدم المترجم في فيجول بيسك 2008 الاستدلال عل gillوع Type Inference‏ 
لتحديد نوع المتغيرات المحلية التي تم التصريح عنها بدون استخدام فقرة ء۸ في تعبير التصريح حيث يستدل المترجم على نوع المتغير من نوع 
التعبير الذي يضبط قيمة ذلك المتغير مما يوفر إمكانية تعريف المغيرات بدون تحديد نوعها 


Object Relational Designer (O/R Designer) 
بسطح رسومي بسیط لإنشاء فئات 5ع5ءھا٤ اا٤ اوك ه† وا والعلاقات بين الأغراض المختلفة في قاعدة البيانات‎ 0/۴ Deیiع‎ "٥۴ یزودنا‎ 
منتجا ×ع†"ه٤هtهD تستخدم لإرسال واستقبال البيانات بين الوعءوها) و قاعدة البيانات. كما أنه ينظم التعامل بين الطرائق المختلفة في ال‎ 
وبين الوظائف والإجراءات المخزنة في قواعد البيانات من أجل العودة بالبيانات إلىءعءءها) كما أنه يوفر إمكانية تصميم العلاقات‎ ata context 

والوراثة بينءعءءھ|ا€ 


TableAdapterManager 
هو عنصر جديد في فيجول ستوديو 2008 مبني على الميزات الموجودة للبيانات في ال sاعءة†ة0 و ال ٬عtمAdaءا۲ab مزودا إمكانية لحفظ‎ 
التي تربط الجداول ببعضها لتحديد الترتيب الصحيح لإرسال أو از الحذف والإدخال‎ foreign-key ٽlقڻlع البيانات ف الجداول المرتبطة حیث يستخدم‎ 
والتحديث من ال عءهاه0 إلى قاعدة البيانات بدون أن يتم خرق شروط رع)-١عام۲ه۴ التي تحكم تصرفات قاعدة البيانات عند الإدخال أو التحديث أو‎ 
الحذف على السجلات المرتبطة والتي تمنعك من حذف السجل الأب عندما يكون له سجلات أبناء وتدعى عملية الحفظ باستخدام‎ 
فعملية حفظ البيانات في جداول مرتبطة معا معقدة أكثر من حفظ البيانات إلى جدول مستقل‎ .Hierarchicaا‎ Update ب‎ Table Adapter Manager 
وذلك بسبب أن أي عملية على أي جدول ستؤثر على بقية الجداول لذا لابد من تنفيذ هذه العملية على الجداول بالترتيب المناسب من أجل تجنب خرق شروط‎ 
المحددة في قاعدة البيانات‎ reign -key 


WPF Designer 


يمكنك من استخدام بيئة التطوير لتصميم تطبيقات و أدوات ۷۴۴ دامجا التحرير الآني للغة ا ه× مع إمكانية التصميم الرسومي المحسن حيث 
يمكنك رؤية التعديلات على نص |ام ه× وأنت تقوم بالتحرير الرسومي لانافذة كما يمكنك الانتقال السريع بين التحرير الرسومي والنصي بسرعة 


Reports Wizard 


ستجده يشتغل تلقائيا عندما تقوم بإنشاء أحد مشاريع التقاریر Reports Application‏ و ASP.NET Reports‏ وهو يقودك عبر عدة خطوات 
لإنشاء التقرير الأساسي مما يمكنك من تحديد مصدر البيانات وإعادة تحديد ال وموهة0 واختيار نوع ومظهر التقرير تم يمكنك تحسين مظهر التقرير 


vb4arab.com 
مجلۃ سشمرية مجانيةۃ تصدر عن موقع فيجوال بيست العربا‎ 


العدد 01 لشهر ينایر / فبرایر ون سنةۃ 2008 


محود سامر أبو سلو 


بینہ التطوير 

نلاحظ أولا الشبه الكبير في الشكل بين بيئتي التطوير في 2005 و 2008 مع عدم إغفال العديد من التحسينات المقدمة عليها فقد 
أصبح بالإمكان تهجير الإعدادات من بيئة تطوير 2005 إلى بيئة تطوير 2008 بسهولة ونلاحظ اختفlء‏ الأوalر Checks Ask a Question‏ 
Status‏ uestionلذین‏ تمت إزالتهما من أجل تقديم بند جديد في قائمة مام باسم sص‏ ں۲٥۴ M50۸۷‏ كما تمت إزالة جميع محتويات قائمة 
unİtyصmصدC‏ وأصبحت بيئة التطوير تستخدم صناديق الحوار الخاصة بالنوافذ بدلا عن استخدامها لصناديق حوار مخصصة ووسع ال ءئها٣‏ 
اneعDesi‏ ليشمل دعما محدودا للغة ++ إضافة إلى دعمه للغتي ٥#‏ و ۷8B‏ كما في الإصدارة السابقة كما أنك ستجد أنواعا جديدة من 
المشاريع مثJل Web Application Projects‏ و دعم 1 AX Development‏ ونوعان جدیدان لمشاریع التقاریر واا0م‌Re‏ 
WPF Custom sy WPF Browser Application gy WPF Application ja WPF gaرlang ASP.NET Reports s Application‏ 
Control Library‏ و WPF User Control Library‏ وقدہ مصمم خاص لواجهات ۷۴۴ إضافة إلى تحسينات على النشر بتقنية 
ClickOnce‏ أو باستخدام erااھ†ns| Windows‏ شملت دعم ۷۲۴ ودعما للنسخ المختلفة من الفريم وورك ع” ا٥‏ ع۲ ه†اtاMu‏ ودعما ل 
UA‏ هاءi.‏ إضافة إلى ذلك فقد أضيفت بعض الأدوات لدعم )٤55(‏ ءععhء‏ عارtء‏ عdinهعءهع‏ فمعظم العمل في ال ٤55‏ أصبح يتم الآن 
عبر ما يسمى ب لأاع sعi†اممoاP CSS‏ إضافة إلى الألواح الجانبية الخاصة ب ءعار†؟ yاممA‏ وءعارSt Manage‏ كما وسعت خاصية 
|!ntellisense‏ لتشمل ASP.NET AJA×‏ و tمscripل‏ وأیضا M1‏ ×. 


وفيما يتعلق ب ۲عء س٥8‏ زط0 فقد تمت إضافة خاصية ععع هاخا" إليه فأصبح بالإمكان فلترته لعرض نسخة محدد من الفريم 
وورك مع إمكانية البحث في نسخة معينة من الفريم وورك أيضا. 


كما أنك ستجد بعض التحسينات فيما يتعلق بالتقارير فمصمم التعابير الخاص بالتقارير أصبح يقدم بعض الأمثلة الممكن استخدامها كما أصبح 
llتھSمp RSClientPrint‏ عندما يکون التحکم ASP.NET ReportViewer‏ موجها للمعالجة المحلية كما أصبت تحكمات 
Report Viewer‏ تقوم بضغط التقریر عندما يتم تصديره إلى صيغة 5۴ م۲ 


وفيما يتعلق ببناء المشاريع فقد أصبك بإمكانك تحديد أي نسخة من الفريم وورك سيتم بناء مشروعك ليستهدفها مع إمكانيات خاصة من أجل 
الأنظمة متعددة المعالجات سواء كانت C0٣٥‏ |i†|اMu‏ أو Seperate‏ 


Linq 
تضيف ۹زا إمكانيات استعلامية قوية للغة البرمجة فهي تقدم إمكانيات بسيطة وقوية عندما تتعامل مع العديد من أنواع البيانات‎ 
إضافة إلى إرسال الاستعلام إلى قاعدة البيانات كي يعالج إضافة إلى إمكانية التعامل مع صيغة مختلفة للاستعلام لكل نوع من أنواع البيانات‎ 
الاستعلامات کجز ء من اللغةَ مستخدمة صيغة موحدة للاستعلام بيعص النظر عن نوع البيانات‎ Linq التي تقوم باأبحث عنها. حيث تقدم‎ 
۸00 مم5 ا50 أو 1× أو المجموعات والمصفوفات في الذاكرة أو‎ ٣ المستخدم مما يمكنك من الاستعلام عن البيانات من قاعدة بيانات‎ 
أو أي مصدر بیانات محلي أو بعید یدعم ٣اا حيث يمكنك عمل ذلك کله باستخدام عناصر اللغة الشائعة لأن استعلاماتاك‎ .net Datasets 
أصبحت مكتوبة بها ونتائج الاستعلام تعاد كأغراض أنواع بيانات قوية داعمة مء م؟ا|امم| مما يسرع من كتابتك للكود وأصبح اكتشافك‎ 
للأخطاء في الاستعلامات عند ترجمة المشروع بدلا من وقت التنفيذ كما أن استعلامات "أا يمكن أن تكون مصدرا لاستعلامات إضافية لمزيد‎ 
من الدقة في البحث. مع إمكانية ربطها مع التحكمات لتمكين المستخدم من استعراض وتعديل نتائج الاستعلام بسهولة كل ذلك يأتي عبر عدة‎ 
يمكنك من الاستعلام في الأغراض المختلفة مثل الفئات‎ Linq to Objects لتوفير هذه الميزات المختلفة فالمزود‎ Linq مزودات خاصة ج‎ 
والمصفوفات والمجموعات طالما أنها تدعم الواجهة عااةمصںمع| أو الواجهة (۲)عااة۲مصuمع| والمزود اه5 ه٥ وا الذي يمكنك من‎ 
الاستعلام من قواعد البيانات أو التحديث إليها والمزود ۷1× ها وأا الذي يمكنك من التعامل مع 01× من حيث القراءة والحفظ بسهولة‎ 

وأخيرا المزود مهاه 0 t0‏ وا الذي يمكنك من الاستعلام من كأعءه†م0 tعمم.‏ ۸00 والتعديل عليها 


Client Application Services 

تقدم Services‏ icati0onاApp‏ ientا٤‏ طريقة مبسطة للوصول إلى خدمات الدخول ل ×هزة و اعم. مء إضافة إلى الأدوار ومامR‏ و 
services‏ eاiگroم‏ من داخل تطبیقات ۴٥۲"5‏ sس0لہ|W‏ أو P۴‏ وتأتي ضمن SP. NE 2.0 ۸۸× ٤×†م "si0۸5‏ التي تم تضمینھا في 
فيجول ستوديو 2008 مع الفريم وورك 3.5 وهي تؤمن لتطبيقات متعددة تعتمد على ويندوز وويب المشاركة على معلومات المستخدم وإدارته 
من خلال خادم واحد وهي تتضمن مزودات خدمة زبون التي ترتبط مع خدمات توسعات ويب لتوفير تعريف بسيط للزبون وإمكانية البرمجة 
ززعم أكول الانقطاع و التكامل مع مصمم الإعدادات الخاصة بفيجوال ستوديو 


vbêarab.corn 


للوشاركة أو الاستفسار زوروا موقعنا ۳ illت vb4arab.com‏ 


الحدت 


مقدوة إلى التقنيات القادمة مع الفيجوال ستوديو 2008 


وحود النبهاني 
هذه هي مايكروسوفت » تحديث دائم وتطور مستمر لا يعرف التوقف أو الكلل »› الإصدار الأقدم من مالن)؟ 1وuء۷‏ أصبح 2008 › وقد بدأ الحديث يكثر 
كثيرا حول هذا الإصدار في الآونة الأخيرة وما يحمله من تحسينات وتطويرات يعول عليها المبرمجون والمطورون ٠‏ فما هي التطويرات القادمة مع نسخة ال 
8 من الفيجوال ستوديو؟ 

تقول شركة مايكروسوفت - كما يتضح من الصورة أعلاه - بأن الإصدار الجديد يستهدف الاستفادة من ميزات منتجي مايكروسوفت ع01 : وكذلك نظامها 
الجديد هء¡۷ وكأن هذا الإصدار سيكون هو الإصدار الأكثر توافقا معهماء وهذا الأمر واضح ف 2005 i0لنا؟‏ اوuئ¡۷‏ لا يعمل تحت هء۷ دون وجود 
حزمه التحديثات الخدمية الأولى $9۲۶1 النسخة الخاصة بفيستاء كما انه يستغل الإصدار 3.5 من إطار llعJa. net Framework‏ 

تقدم هذه الصفحة ءالكثير من المعلومات التفصيلية حول التطويرات القادمة مع الفيجوال ستوديو 2008ء شامله كل جزء من Sudo‏ 1جمVisu‏ 

ولغات ال kإFramewo‏ tعہ‏ کلھا › وتجدون فیھا ملفات XpS‏ تحتوي ا الكثير من المعلومات» ولقراءة هذه الصيغة الجديدة من الملفات 
يمكنكم تحميل عارض هذه الصيغة بالنقر هنا واختيار الإصدار المناسب لك ولنظامك - للمزيد من المعلومات حول هيئة وم× الجديدة انقر هنا. 

يقدم هذا الملف نظره عامه سعز۷إ م0۷ عن الإصدار القادم > وسنحاول هنا اختصار هذا الملف وإلقاء الضوء ونظره سريعة وملخصه لأهم 
الميزات والتحسينات التي ستتوفر في هذا الإصدار. 

وسأعود قريبا لإكمال هذا الموضوع المهم لي ولكم كمبرمجي ومطوري .)اه سعدصهإ۴ ..٥1‏ ولكن قبل ذلك أقدم مجموعة من الروابط وروابط 
بيئة التحميل لمن أراد تجريب هذا الإصدار. 


- زيادة الإنتاجيہ 
بق ارال فد تى 2008 لر ات تاع طن اختصار لفت الى تخاجه اقام معام بر مح طريا خصروها تك الط قر أعد العاناة > 
كما يقدم أدوات تساعد على تقليص الوقت والمهام البرمجية العادية. 
- التحكم بدوره حياة الموشروع 
يقدم الإصدار Team System‏ أدوات وتحسينات جديدة لأتحكم بدوره حیاه المشروع وأجزائه كما یسهل عملیه التواصل مع العملاء بغيه 
تطوير وتحسين المشروع. 
- استغلال أحدث التقنيات والاندياجح وعها 
يقدم الفيجوال ستوديو 2008 دعما كبيرا لأحدث التقنيات من مايكروسوفت وبشكل أساسي أيضا > ومن أهم التقنيات التي يدعمها هي عع؟0۴ 
Vista gs 2007‏ 6 وتسخير إمكانياتهما وما يتمتعان به من أمان وبنيه متينة وفعالية في الأداء لإنتاج تطبيقات تستفيد من هذه الميزات 
وتكون فعاله في ادائها. 
أهم التطويرت التي ياتي بها الفيجوال ستوديو 2008 
يأتي الفيجوال ستوديو 2008 بتطويرات جديدة » منها 

تحکم قوي بالبیانات 
يدعم الفيجوال ستوديو 2008 تقنية [1NQ‏ والتي هي اختصار للعبارة Query‏ 4ع Language ]ntegra‏ : والتي تعني بالعربية : لغة 
الامنفمارات المكاطة رها موضيرع طرنل للبت عة قد قدت عه لحا لذا تافر نا الرقك- كا نري الفيجرال ستر دير 2008 عل 
تطویرات كبيرة أيضا في .۸50.N ٤۲‏ 
- دعم أكبر لتطبيقات ويب 
وهل تحتاج هذه التطبيقات دعم أكثر من الأن الفيجوال ستوديو 2008 يقول نعم !! يقف الفيجوال ستوديو 2008 شامخا ليقول : أقدم دعما 
متكاملا ل 7.0 115 والذي ظهر مع ويندوز فيستا ! » أيضا المزيد من الدعم لتقنية ×۸[۸ في تطبيقات ويب العميل » والمزيد من الدعم والأمان | 
في مختلف التقنيات التي أوفرها. 
- تحكم أكبر بدوره حيام الوشروء ۸1.5 
تكلمنا عن هذه النقطة من قبل» لكن هنا ما سنقوله هو : يمكنك الإصدار mعاءر؟‏ "ه1 من التحكم اكبر بالمشروع والتواصل بالعملاء لضمان 
الحصول النتيجة المرغوبة من التطبيق من العملاء ومدراء تقنية المعلومات. 
- استھدlف:‏ 3.5 Windows Vista & .net Framework‏ 
يعد الفيجوال ستوديو 2008 الإصدار الرسمي الموجه لتطوير تطبيقات تعمل باستخدام 3.5 ls Windows Vista & .net Framework‏ 
هو ما يفتقره الإصدار الاقدم ( اقصد 2005 ) » فهو يستغل كل صغيرة وكبيرة في هاتين البيئتين المتصلتین والمرتبطتین › ک W۷۴۴‏ وغيرها من 


التقنيات. 
- إنشاء تطبيقات أوفيس 
يقدم الفيجوال ستوديو 2008 دعما غير مسبوق لتطبيقات أوفيس وخصوصا الإصدار 2007 الأمر الذي يعني انك تستطيع تخصيص أي تطبيق 


من تطبيقات 7 Microsoft Office‏ وجعلها تعمل بالطريقة المناسبة لك والتي تزيد من فعالية الإنتاج لديك» علما بأن هذا الأمر مقتصر 
کر فjı‏ قط Professional Edition‏ . 


e 
vbêarab.corm 


) استفسار زوروا ووقعنا علی النت ۵42۲.٥٥۳7‏ العدد 01 لشمر يناير / فبراير ون سنة 2008 


ومحود النبهاني 
نكمل ما بدأنا به أعلاه» وقد ذكرت احد أهم الميزات الجديدة في الفيجوال ستوديو 2008 وهي التحكم الأقوى بالبيانات من خلال ]]NQ‏ ودعم 
مکتبه 1 ۸50.N٤‏ لها » فما هي تقنیة N@Q‏ ]1 یا تری ؟ 


E E ا‎ 
1.1N 0 وشروع‎ 


لقد ظهر مشروع 11NQ‏ ليحل مشكلة استخدام لغة الاستعلام 8Q1‏ التي لا غنى عنها في تطوير أي تطبيق معتمد على قواعد البيانات 
لاستخدامها في مختلف الأغراض: عرض البيانات ويشمل البحث والفرزء تحديث البيانات وغيرها... ولكن ما هي هذه المشكلة التي نتحدث عنها 
هنا ؟ 


تكمن هذه المشكلة في انك عندما تحتاج إلى كتابه جمله استعلام داخل كود معين فإنك بحاجه إلى كتابه العديد من علامات التنصيص وتقسيم 
الكود بطريقة بشعةء ناهيك عن استخدام الباراميترات! 


وعندما ظهر هذا المشروع» كان الهدف منه هو دمج لغة SQ1‏ مع لغتي #٣‏ و ۷8.٤1‏ أي جعلها مندمجة معهما واستغلال ميزاتهما 
داخلهماء تخيل أخي العزيز القيام بتفر ع S٤1 ٤)1‏ داخل جمله استعلام؟ أصبح هذا ممكنا الآن بكل سهوله! 


لاحظ معي أخي العزيز هذا الكود المكتوب بلغه #٣‏ › لاحظ كيف تمت كتابه الاستعلام بلغة #٣‏ واستغلال إمكانيات هذه اللغة لكتابه استعلام 
بسيط؟ هذا الكود قد لا يكون واضحا كفاية أو لا يدل على كل فوائد هذه الطريقة لذلك سأضع هنا بعض الأمثلة لها. 


إن تطبيق تقنية ال 11NQ‏ يتم باستخدام إحدى الطرق وأشهر ها وما وهي تقنية تمكنك من كتابه الاستعلام بنفس اللغة التي تستخدمها في إطار 
العمل ک #٣‏ أو ۷8B .N٤1‏ ليتم ترجمتها وقت التنفيذ آليا إلى جمله استعلام بلغه 9Q1‏ تلقائياء أي أن تقنية ],1NQ‏ بشكل عام تعمل على ترجمه 
كود محدد من إحدى لغات الدوت نت إلى جمله SQ1‏ وقت التنفيذ وذلك لتسهيل كتابتها والتعامل معها وللاستفادة القصوى من إمكانيات اللغة 
التي تستخدمها أنت في التطوير الأمر الذي يعني انه وبمرور الزمن سيقل استخدام المطورين لجمل الاستعلام 8Q1‏ وقد تكون هذه هي نهاية لغة 
1 بشکل نهائي! 


في الحقيقة هذه اللغة ستسهل علينا كمطورين القيام بتطوير تطبيقات قواعد البيانات» فبدلا من تعلم لغة برمجة ك #٣‏ أو cزوه8‏ ua1ء¡۷‏ ومن ثم 
تعلم 8Q1‏ والتبحر فيها وما تشمله من إجراءات مخزنة أو أنواع بيانات خاصة بهاء ثم تعلم كيفيه الدمج والربط بين الاثنين وتوحيد أنواع 
البيانات › الان أصبح بامكانك تعلم لغة البرمجة فقط )# - أو - Visual Bas1c.net‏ وستقوم بكل ذلك باللغة وحدها دون الحاجة لتعلم المزيد 
وضياع المزيد من الوقت في الكتابة والتوفيق في الشفرات. 


كما أن هذه التقنية قد تشمل لغات مختلفة ك .٥‏ أطم 1ء مثلا نظرا لهذه الفوائد التي تكلمنا عنها والتي تزيد من الإنتاجية وتسهل عمل المطور 
بشكل واضح. وهذا مخطط يبين هيكليه هذه التقنية ومدى تداخلها مع لغات الدوت نت وإطار العمل والكائنات التي نضمنها في مشاريعنا: 


أخيرا اختم هذه الفقرة ومن أراد المزيد من المعلومات 
أو التوسع في هذا الأمر فليزر الروابط التالية التي هي 
مراجع لمقالتي عن 11N@Q‏ 


The LINQ Project Microsoft Web 
page 

NET Language Integrated Query Looking to LINQ - Redmon 

Developer News 


Others... 


LINQ to LINQ to LINQ to LINQ to LINQ to Language Integrated Query Wiki- e 
Cbjecis DataSets اا‎ Entities pedia 

هه وھناموضوع من مجلة MSDN‏ 
eMagazineدد‏ ڍigڍg‏ 2007 VB.NET‏ 
وهنا € 


Cbjects Relational 


للمشاركة أو الاستفسار زوروا ووقعنا على النت ١٠c0ء.abإvb4ar‏ 


مقدوة إلى التقنيات القادمة وع الفيجوال ستوديو 2008 


وحود النبهاني 
سنتحدث الذن عن التكاول بين 2008 Microsoft Office 2007 g Visual studio‏ 


تقدم مايكروسوفت الحزمة عOff¡c Studio ro01s ۴r‏ 1اVisua‏ » و ابتداء من الإصدار 2008 سيكون التكامل كبيرا مع الإصدار 2007 من 
الأوفيس » وهذا الكلام ينطبق على إصدار المحترفين من فيجوال ستوديو . 


الآن يمكنك تطويع إمكانيات عءficگ0f Microsoft‏ لتطوير تطبيقاتك المختلفة ڊوlء‏ كlنٽ Web e Windows Applications‏ 
)امم بنفس اللغة التي تستخدمها في العادة ! 


ويمكنك هذا من تخصيص تطبيقات مختلفة من |لأو فيس ك Word, Excel, PowerPoint, Visio, InfoPath, Outlook‏ و Project‏ للعمل 
بالكيفية التي تريدها والاستفادة من الميزات الجديدة للإصدار 2007 من أوفيس . 


وتوكن الحزمة ۷510 اليطور من القيام بوهام متعددة على سبيل المتال 


- الاستفادة القصوى من ميزات الإصدار 2007 من أوفيس في تطوير مستوى التطبيق ومستوى الوثيقة ۲٣ع‏ ںءه( التي تقوم بتخصيص 
أوفيس 2007 بسهوله وسرعه. كما يحتوي الإصدار الجديد من ۷810 على مصمم مرئي للوظائف الرئيسية الموجودة في تطبيقات أوفيس مما 


- تصميم تطبيقات تعتمد على الواجهة المرئية الموجودة أساسا في تطبيقات أوفيس 2007 مما يمكن المطورين والمبرمجين من بناء تطبيقات 
یکون فیھا f¡ceگ0‏ tگoیماMic‏ ھو المتحکم بالبیانات ومدیرھاء ویتم ربطھا باستخدام خدمات ربط البیانات من Sharِ‌ P11٤‏ . 


- تصميم تطبيقات تستفيد من إمكانيات مز ود ٤م1ه 2١٥١٣‏ ط؟؛ وبناء تطبيقات ويب لهاء فاذا علمنا انه يمكن الاستفادة من أجزاء Web Parts qy‏ 
الخاصة ب اه۴ عإهط؟ في تطبيقات أخرىء» فتخيلوا معي الفوائد التي تجنى من أمر كهذا! 


- تصميم تطبيقات أكثر أمنا وأسهل في التطوير» حيث تدعي مايكروسوفت أن الإصدارات القادمة من Studio‏ ua1ء¡۷‏ و ع0۴1 ستكون بنفس 
البنية القادمة في الفيجوال ستوديو 2008 والموجودة في أوفيس 2007 ما يعني انه يمكنك استخدام تقنية مء 0 )ع11٤‏ لتحزيم تطبيقات أوفيس 
بكافه إعداداتهاء مما يعني أن المطورين ومدراء المعلوماتية يمكنهم الآن تطوير وصيانة تطبيقات ع0۴۴1 المخصصة بكل سهوله وأكثر من أي 
وقت مضى . وهذا يعني أیضا أن تطویر تطبیقات تعتمد على 2007 ع٥0۴۴1‏ so۴هاMic‏ ھو أمر سهل. 

Windows Vista & .Net Framework 3.5 استهداف البروجA تحت‎ 


يستغل الفيجوال ستوديو 2008 الميزات المتوفرة في ويندوز فيستا والإصدار 3.5 من إطار العمل دوت نت» الأمر الذي يمكن 
المطورين من تطوير تطبيقات تستفيد من هذه التقنيات وما تحتويه من تحسينات جبارة وطفرات كبيرة في عالم المعلوماتية. 


وأهم التطويرات التي يحتويها الفيجوال ستوديو 2008 في هذا المجال ما يلي 


1/ تقليل الوقت حيث يمكن الفيجوال ستوديو 2008 المطورين من استغلال الوقت بشكل جبار » من خلال: 


- دعم الهيئات العامة المختلفة التي يوفرها ويندوز فيستا و الإصدار 3.5 من إطار العمل دوت نت مثل - >۸١]‏ وهذه بحاجه إلى تفصيل 
للبعض - للتحكم الأقوى والأسهل بتصميم النوافذ والتحكم بخصائص الأدوات وتصميمها وربطها بمصادر البيانات» فمثلا الفيجوال ستوديو 
208 يدعم استخدام Microsoft Expression Suite‏ الذي يساعد في تصميم النوافذ والأدوات وتصديرها كملفات تصميم خاصة إلى 
الفيجوال ستوديو 2008 ليتمكن المطور بعدها وبسهوله من إكمال عمله ومباشره كتابه الأكواد. 


- الآن أصبح سهلا الاعتماد على طقم ععi؟؟0‏ )fهومإءMi‏ كمنصة عمل وتطوير تطبيقات تعتمد واجهتها على الواجهة الموجودة في تطبيقات 
أو فيس و - SharePoint‏ شخصيا لم افهم هذه اأنقطة أحد الان! 


2/ تصمیو تطبیقات تعتود على تقنیة W۴‏ 


حيث يمكن الاآن للمطورین تطویر تطبیقات تعتمد على WPF‏ وهو اختصlر‏ | Windows Presenation Foundation‏ 
» فالفیجوال ستودیو 8 يحتوي علٴ محرر أ XAML‏ > وقوالب مشاريع وغيرها من الأدوات المفيدة. 
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الححدتث 


مقدمة إلى التقنيات القادمة مع الفيجوال ستوديو 2008 
محود النبهاني 
3/ استتمار الإمكانات المتاحة التي توفرها واجهة المستخدم 01ا 

في الفیجوال ستودیو 2008 یمکنکم استخدام تقنیات ال ,ئدصإه ۴ sسەلnم¡W‏ , ۴ WP‏ في تطبیق واحد › فمثلا یمكنك استخدام ۷۴۴ في تطبیق 
بتمکين WIndows E Visual Designer‏ ليقوم تلقائيا بضبط ومحاذاة الأدوات والمحتوى الجديد إلى تلك القديمة» هذا الأمر يعني انه 
يمكنك استخدام WPF‏ في تطبيقات تعتمد تعتمد علی IIx Windows Forms‏ مشاکل ستفهم هذه اأنفقطة عند التطبيق فلا تستعجل ن عزيزي 

4/ اجعل تطبیق +٤٣‏ + يعمل بإحساس ویندوز فيستا ! 

التطبيق 7 الفيجوال ستو ديو 500 تحت فیستا وانتهت ت القضبة 

وبالمناسبة فليس لدي الوقت الگاقی للحديث والتفصيل في XAML‏ فهده تقنيه كاملة لتصميم النوافذ والأدوات تساعد المصممين غل تصميم 
التالية: 

XAML Overview from Microsoft 


http://www.xaml.net/ 
وهذه كانت أهم التطويرات التي تهمنا في هذا الجانب.‎ 


والآن سأتطرق إلى الدعم الذي يوفره الفيجوال ستوديو 2008 لتطبيقات ومواقع ويب» حيث أن الفيجوال ستوديو 2008 يقدم ما يلي : 

- دعم كبير ومتكامل لتقنية AJA‏ 

إن تقنية أجاكس من تعد من احدث واهم التقنيات في عالم ويب اليومء lS RS‏ اإاصدار ها الحزمة 
البرمجية المسماة ‰6 والتي تمکن مطوري مواقع ویب الذين يستخدمون ۸P. N۴1‏ من تطویر تطبیقات ویب تفاعلیھ تستخد لسبحدم هذه الأتقنية. 
إلا أن الإصدار الحالي من فيجوال ستوديو 2005 لا يأتي بذلك الدعم بشكل مبيت » أما الفيجوال ستوديو 2008 فهو يدعمه من الصفر وحتى 
النخاع» فقط كل ما عليك التأكد منه هو وجود متصفح متوافق مع متصفح الموãع‏ ک Windows Internet Explorer‏ وغیر. 

- تصميم خدوات ویب S٥۲۷1٤٥٤‏ ط٥W‏ اصبد اُکثر سھولہ وتدکوا 

يمكن لمطوري ويب الذين يبنون خدمات ويب باستخدام الفيجوال ستوديو 2008 أن يقوموا بتجربة واختبار خدمات ويب التي يصمموها بدون 
الحاجة إلى استخدام أي شفرات إضافيةء كما یقدم الفیجوال ستودیو 2008 دعما کبیر للتحکم ببروتوکولات ویب ک ۲/1۲ 1۲۲۲,۲٥‏ من أجل 
ضمان أفضل تحكم وأداء لخدمات ويب. 

- استهلاك اأسھل لخدوات W٤٣۴‏ 

الآن أصبح بإمكان المطورين استخدام أدوات 8۸5 الجديدة لإنشاء خدمlٽ‏ ) WCF ( Windows Communication Foundation‏ 
وتجربتها بدون الحاجة لكتابه أي كود إضافي» كما سيتمكن المطورين من التحكم بمنافذ بروكسي وإنشاء اتصالات العملاء أا 
Connecti‏ بكل سهوله. 

- توظيف خدمات 504A‏ و W۷٣۴‏ في تطبيقات الهواتف والأجهزة المحمولة كفيا 

الان أصبح تطویر خدمات عمیله وتطبیقات عميلة تعمل على أجهزه محمولة بغض النظر عن کون هذه الأجهزة متصلة أم لا بمرکز الاتصال› 
واستيراد البيانات طالما أمكنه ذلك ودون تدخل منك عزيزي المطور فلا تقلق 

وهذه كانت أهم التطويرات التي تلحق جانب تطوير تطبيقات وخدمات ويب في الفيجوال ستوديو 2008. 

لنرجع إلى ووضوع تقنية ال 11١٩4‏ 

سنتحدث عن تفنية 1N@‏ ل يحملها الإصدار 2008 من Sudo‏ ua1ئ۷1‏ ولكن في الحفيقة انه استغلال للوقت وتعلم لشيءِ جدید سیجعانا 
قادرین فلي العمل معا 

هذا المقال مقال مترجم وهدا مصدره للأمانة »› ولا تنسوا 0 الترجمة هي مصدر رئيسي للمعلومات أدت إلى تفوق امتنا الإسلامية العربية في 
ار مان و هى الرس اى حت الرب ارم بل فى هة ال رة الب الما لن تمده الال الوم 


وأحب التنويه هنا أنني كتبت هذه المقالة أولا لجامعة أهلا عرب وقد وضعت نسخه منه هنا ليستفيد اكبر قدر ممكن 
من المبرمجين والقراء منه وإتباعا لسياسة عدم احتكار العلم والمعرفة والحفاظ عليها من الضياع. 


“a 
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مقدوة إلى التقنيات القادمة مع الفيجوال ستوديو 2008 


أولا: موا هي تقنية 1.1N@‏ 
لقد تحدثت في هذا الموضوع عن هذه التقنية بشكل مختصر وهناك تجد جواب هذا السؤال فلا داعي للتكرار 


LINQ to 5QL a ئانيا: ما‎ 


هي عبارة عن آداه تتوفر في الفيجوال ستوديو 2008 تقوم هذه الأداة بعرض قاعدة البيانات التي تتصل بها على هيئة فئات .ع مما يساعدك 
على استخدام تقنية 1,[NQ‏ وما تتضمنه من إمكانيات مختلفة كعرض البيانات وتعديلها وحذف البيانات وإضافة بيانات جديدة وغيرها من الأوامر 
التي تمكننا لغة 8Q]‏ سابقا من القيام بها. ويجب أن نعلم أيضا أن هذه الأداة لا تغفل مكونات قاعدة البيانات الأخرى كال ,وسع¡۷ 
.Transictions and Stored Procedures‏ 


وتوضح هذه الصورة أداة 1NQ 0 SQ‏ التي ترجمت قاعدة بيانات ل1س ط)إه" الشهيرة 


7 Stylesheetl.css | Default.aspx.cs" Northwind.dbml” ’ Default.asp» اا‎ 


Method FaRmê | 


^ GetProductsBy Category (Int32 category|D) 


3 Properties 
3F HF ProducelD 4----===C©0 7 7 Category 
î ProductName 1 LategqoryName 
E SupplierlD 2 Description 
 CategorD 2 Picture 
î QuantityPerlUnit 
Î nitPrice 
i UnitelnStock 
2 UnitsOnOrder 
" ReorderLevel 
î Discontinued Î Properties 
* 3 Î OGrdeiD 
î CustomeiD 
FF EmployeedD 
N OrderDatê 
3 Required Date 
: Î ShippedDate 
3 Properties  ShipVîa 
3 orderD ۰ 1) Freight 
FÎ ProductD ll A ShipName 
E UnitPrice 2 ShipAddress 
E Quantity  Shipity 
î Discount 3T ShipRegion 
سے‎ HY ShipPostalCode 
0 Shipkountry 


3 Properties 


ويوضح هذا الفيديو كيفية استخدام هذا المحرر كتابه بعض الأكواد بهذه التقنية. للمزيد من المعلومات حول هذا الفيديو الرجاء النقر هنا. وخذها 
نصيحة مني» لا تفوت الفلم السابق وحاول قدر الإمكان أن تشاهده قبل أن تكمل هذه المقالة لأنه بالفعل يوضح لك الاستخدام العملي لهذه التقنية 
بلغه #٣‏ وطبعا مع .N٤1‏ ۷8 سيكون مثله وسيكشف لك الكثير من الغموض! 
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ا الحدت 


وقدمة إلى التقنيات القادمةۃ مع الفيجوال ستوديو 20068 


وحود النبهاني 
ونلاحظ من هذه اللصورة کیف أن قاعدة البيانات تظهر جداولها کفئات net.‏ وهنا السر ق كيفية الاستخدام المباشر للجداول والكائنات الأخرى 
لقاعدة البيانات في شفراتك 


والآن حان وقت الجد الحقيقي » وقت التعامل مع الشفرات 

أمثله للتعامل مع تقنية 11N@‏ بالكود 

لاحظ الكود التالي مرفق بصيغه V8.N ٤1‏ و WebApplication1 #C‏ 1-3 

E-I Project References 
E-{} WebApplicationl 

lı #+ Category Product product = db. Products. siînglefp => p.ProductName — "Toy 1°); 


NorthwindDatacontext db = new Northwindpatacontext i): 


tg Default product. UnitPrice = 99; 

H-# MyProduct product. UnitsInstock = 5; 

- | 

: i. Base Types db. submî tchanges (J); 

1 a #È DataContext 

E-$ Order NorthwîndDataCcontext db = new NorthwîindpDpatacontext (Û); 
E-% OrderDetail 

E-RE Product var products = from p 1n db. Products 


r 


where p.Categqory. CategqoryName == "Beverages 
select p; 


A GetProductsByCategorylint?)] 
i NarthwindDataContet(string) 
|3 NorthwindDataContext(System.Data IDbConnection 
= NorthwindDataContext] 

EF Categories 

FF OrderDetails 


Dim db A5 New Nor thwîi ndDatacontext 


Dim products = From p In db. Products _ 
where p.Ccategory. CategoryName = "Beverages" _ 
select p 


1 e Orders 
<F Products 


من خلال محاوله قراءه الكود السابق نجد انه يقابل شيئا مثل الجملة التالية في @$ 


SELECT P FROM Products WHERE Category.CategoryName = "Beverages" 


لكننا نلاحظ انه من احد الفوائد الرئيسية هنا أننا حصانا علی کائن یسمی r06‏ يحتوي على ناتج الجملة السابقة بشكل مباشر ! 
2/ تحدیث ctں‌‏ )ه۴۲ في قاعدة البیانات 


الكود التالي يمثل مقابل لجمله استعلام لتحديث الجدول واعuںلهإ۴‏ في السجل الذي تكون فيه قيمه الحقل ع2 Pr0duc)N‏ تساوي1 1٥y‏ 


Northwîi ndDataContext db = new NorthwindDatacontexTt(); 
Product product = db. Products. singlelp => p.ProductName — "Toy 1’); 


product. UnitPrice = 99; 
product. UnitsInstock = 5; 


db. submîi tchanges (J); 


Dim db A5 New Northwîndpatacontext 

Dim product = {From p In db. Products _ 
where p. ProductName = "Toy 1" _ 
select pJ.single 


product. UnitPrice = 99 
product. UnitsInstock = 5 


db. submî tchanges (J 
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. الحدن 


وقدمة إلى التقنيات القادمۃ وع الفيجوال ستوديو 20068 


محمد النبهاني 
لاحظ كيف أن عمليه الحفظ والتعديل أصبحت سهله؟ آليس ما تريده أنت كمبرمج هو الحصول على طرق أسهل للعمل وتقليل حجم الكود لتنفيذ 
عمليه معينه مع الاحتفاظ بتحكم جيد بل ممتاز بالعمل ؟ هذا ما تقدمه تقنية 11NQ‏ للمبرمجين في مجال قواعد البيانات! 


3 إضافة رامع م)جه٣‏ جديدة إلى قاعدة البيانات مع 2 Prod uc{s‏ 


NorthwîindDataCcontext db = new Northwîndpatacontexti); Dim db A5 New NorthwîindpataCcont ext 


## create new Category and Products ' create New Category and Products 


category category = new category); Dim category A5 New category : .: 
cateqory. LCaTteqoryName = "ECOTT "5 Toys"; Category. LateqoryNameE = SCOTT 5 TOYS 


PFoduct productl1 = new Product); Dim product1 As5 New Product 
product1. ProductName = "Toy 1"; producti. ProductName = "Toy 1 


Dim product2 A5 New Product 


Product prOoOdUETZ2 = new Producti): 
۳ 0: product2. ProductName = "Toy 2" 


producta2. ProductName = "Toy 2"; 
## Associate Products with Category EOD CS SEED 


category. Products. Add {pr oduct1 J 


category. Products. Add pr oduct1 ); category. Products. Add {product 2) 


category. Products. Add{(product2); 
' Add cat to datab nd 5s: hang 
# Add category to database and save changes Lie ai bio cinae r atehincaiin i-i emits HEC 
: ن‎ : db.Ccategories. Add{category) 
db. categories. Add(category); db. submîtchanges () 

db. submî tchanges (J; 


و هذه هي کل الحكاية يا سلام غل هذه الأتقنية. 
4/ حذف ec)‏ ں ل٥٥‏ من قاعدة البیانات 


وهذا مثال بالكود لحذف جميع السجلات التي تحتوي على "رهآ" في انحتJ CategoryName‏ 


. 8% ك‎ X“ 
Northwîi ndDatacontext db = new Northwindpatacontext (); يا سلام على السهولة الشديدة‎ 
var TtoyProducts = from p in db. Products . ا ن‎ 
where p.ProductName. Contains ("Toy") من‎ Stored Procعdurع استدعاء إجراء مخزن‎ /5 
select pj قاعدة البيانات‎ 


db. Products. RemoveAaAl I(toyProducts ] ; 


يا سلام على الإجراءات المخزنة واستخدامهاء يا سلام 
على سرعتها وعلى تسهيلها للعمل ومن يعمل على 


تطبیق کبیر یعرف معنی کلامی وأقدم له هذه الهدية Dim db A5 New NorthwîindDatacontext‏ 


db. submî tchanges (); 


Dim toyProducts = From p In db. Products _ 
where p.Category. CategoryName. Contaîins{( " Toy") _ 
select Pp 


db. Products. RemoveAll (toyProducts ) 


db. submîitchanges (J) 


NorthwîindDataCcontext db = new Northuîindpatacontext(); 
var products = db. GetProductsEycCategory( 5); 
foreach (Product product in products) 

product. 


= LateEgory 
8 LateqoryID 
3 Discontinued 
2 Equals 

Q0 GetHashCode 
= GetType 

Ef OrderDetails 
ET ProductID 


string Froduct.ProductNarme 
|| # PropertyChanged 
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Dim db A5 New Nor thuwî ndDat aCcont ext 
Dim products = db. GetProducCTsEYCategory (5) 
For Each product In products 

product. 


LategqoryID 
Drscontinurecl 


Public Property ProductNamel) As String 


۳ UnitsIinStock 


WOFFA 


الكود السابق بكلا الصيغتين استدعی اجراء مخزنا في قاعدة البيانات اسمه GetProductsByCategory‏ والذدي أصبح استدعاوٌه لأسهل من أي 
وقت مضىی! 

وقبل ن اختم هذا المقالء› ود أن أخبركم بخبر ¢ وهو ن هده المقالة ليست كاملة ولكنني وضعت الجزء الذي يخص الكود فقط »› فهناك جز ء آخر 

I 


وكالعادة أجدد النداء » يا من تصرون على 2002 0إلںuاء‏ 21و۷1 و 2003 في عهد 2005 الفرق بينهم كبير جدا فلماذا كل هذا الإصرار على 
البقاء في الوراء ؟ 


إلى هنا نصل إلى نهاية هذه المقالةء وأسأل الله تعالى أن تكون من العلم الذي ينتفع به وان تشحذ الهمم بمن لا يزال يعك على ۷86 بأن ينتقل إلى 
Visua1 studio .ne 5‏ وما فوق وانسوا شيء اسمه 2003 10ل ناء 21ںی۷1 و 2002 فهي أصبحت قدیمه جدا 


تحياتي لكم : النبهاني من سلطنة عمان 


e 
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قانون حماية الملكية الفكرية في أي بلد يقوم بحماية أغلى وأثمن كنز من تروات 
البلد وهو العقل. ولذلك يمكننا أن نطلق عليها أيضا حماية الملكية العقليةء التي 
تهدف إلى حفط حقوق التاليف الناتجة بشكل رئيسي من فكر اللإنسان وكل موجهود 


العلمية» ابتكار طرق إدارية» الصور والرسوم.... 


تعقيب/ التعريف ببرنامجح شهادة أكاديمية الونظمة 
العالمية للملكية الفكرية للتعليو عن بعد 


كيف نحل وشاكلنا بانفسنا؟ 

lg‏ السلام عليكم ورحمۂ اللہ وبركاتہ.... 

وثانياً تواصلا لمشاور السلسلة الذهبية في المواضيع العلمية سوف نناقش اليوم 
موضوع يهم المبتدئين بشكل أساسي وهو كيفية استفلال معلوماتك البسيطة في 
تکوین فكرة عن حل المشکلۂ أو الموضوع الذي تنوي برمجتہ ثم ننتقل بإذن من اللہ 
تعالى وتوفيق إلى بعض الاختصارات و الذفكار البرمجية البسيطة التي بالتاكيد سوف 
تستفغلها في العديد من برامجك القادمة وذلك في الموضوع التالي من حلقات هذه 
السلسلة إن شاء اللہ تعالى ... واخص حديثي هذا بأخوتي حديتو العهد بالبرمجة... 


جوال الشكل وفساد الروح 
الكبر الكبر - اللهم أغثنا - 

الشكل: مبرمجح مطور محترف ومميز. 
الروح: متكبر صاحب غرور بالنفس. 
النتيجة : خاسر للدنيا والاخرة 


اعداد نورهان عادل 


تركي العسيري 


أحود ڼدر BADRMEÊED1A‏ 


1 
LL 


حوایۂہ الملکیۂہ الفکریہ ..حمایۂ للعقل 


قانون حماية الملكية الفكرية في أي بلد يقوم بحماية أغلى 
وأثمن كنز من ثروات البلد وهو العقل» ولذلك يمكننا أن نطلق 
عليها أيضا حماية الملكية العقليةء التي تهدف إلى حفظ حقوق التأليف 
الناتجة بشكل رئيسي من فكر الإنسان وكل مجهود عقلي يقوم به» 
والتي تتشكل بصور مختلفة: كتأليف الكتقب» كتابة المقالات 
العلمية» ابتكار طرق إداريةء الصور والرسوم الأفلام المرئية 
والمسموعة» والأهم من هذا كله تطوير برامج الكمبيوتر. 
والإجراءات الروتينية التي تتبعها الدول لحفظ هذه الحقوق تكون 
مختلفةء ولكن في أغلب الأحوال تتم بعد قيام صاحب الابتكار والفكرة 
بتسجيل فكرته والحصول على حقوق التألييف وأخذ براءة 
الاختراع من إحدى الجهات الحكومية والمسئولة عن حماية حقوق 
الملكية الفكرية في الدولة» وقد تكون هناك رسوم بسيطة» وبمجرد 
قار اص اسيل فد كس اا رة لاط عل م 
من النسخ والتزوير والسرقة - أي من القرصنة رع ه۲۲ بشكل عام . 


النظرة الاقتصادية تشير إلى أن الإنسان ليس بحاجة إلى 
شهادة في تخصص علم الاقتصاد حتى يقتنع أن دخول أي صناعة 
جديدة وتطور تقني تشهده أي بلد يؤدي إلى زيادة في الناتج القومي 
المحلي G5۲‏ للدولة. ولو فكرت قليلا وأخذت الصناعات الحديثة 
كالاتصالات والطيران ووسائل الترفيه وغيرهاء ستجد أنها 
ساهمت في زيادة اقتصاد الدولة» ووفرت آلاف الفرص الوظيفية. ليس 
هذا فقطء بل إن دخول أي صناعة جديدة ينتح عنه ارتباطات لجهات 
أخرى» فلو تأخذ الهاتف على سبيل المثال لا الحصر»ء ستجد فرصا 
أخرى لبيع أجهزة الجوال والاتصالات» بل حتى دخلت شركات 
الإعلانات الهاتفية»ء وهناك شركات الترفيه المتخصصة في النغمات 
والرموز على الأجهزة» وظهرت شركات أخرى لصيانة أجهزة الجوال 
وخدمات الدعم الفني» وعشرات الشركات الأخرى المتعاقدة 
0n)‏ مع الشركة الأم» والمزيد والمزيد (وكله في النهاية 
من مصلحة المواطن في توفير المزيد من الفرص الوظيفية)» فلو تلاحظ 
أن جميعها ظهرت بسبب دخول شركة اتصالات في دولة ماء وإنها 
مرتبطة به ارتباطا وثيقا. كذلك الحال مع صناعة البرمجيات 
Software ndustry‏ فعندما تثبت هذه الصناعة وجودها في أي 
دولة» ستلاحظ زيادة في مبيعات أجهزة الكمبيوتر» وستظهر المزيد 
من معاهد تقدم دورات تدريبية» وستكون هناك جهات وشركکات 
استشارية للمشاريع الكبيرة» وسيزداد الطلب على شركات أمن 
المعلومات راااuءمS‏ وشركات إنتاج وحدات التخزين ععج2إS)0‏ 
ئءك;» وستكون الحاجة لمزيد من المبرمجين والمصممين 
والمهندسين» و.. و.. وغيرها الكثير. وهذه القفزات الإيجابية نتيجتها 
قاعدة ثابتة عند دخول أي صناعة جديدة . 


النظرة التنمويةء عندما يقوم أحد الأشخاص باإنتاج برنامج أو 
تطبيق فكرة ناجحة لها صدىء» فالنتيجة ستكون واحدة من اثنتين: أما 
الاستمرار في تطوير هذه الفكرة وزيادة الإنتاجية ر)¡1v) Produc‏ 
التي تقدمهاء وإما الإحباط واليأس سيكون من نصيبه. فلو قضيت 
عشرات الأشهر في كتابة كتاب أو تطوير برنامج» وتمت حماية 
حقوق ملكيتي الفكرية له» فماذا ستكون النتيجة؟ 


للمشاركة أو الاستفسار زوروا موقعنا على النت ٠٣‏ c0ء.vb4arab‏ 


ترکي العسيرى 


بكل تأكيد لن أقف مكتوف الأيدي شاعراً بالاكتفاء الذاتي» بل ستزيد 
من حماس الشخص والتطلع إلى التطوير والتنمية في هذا المجالء 
ويبدأ بالعمل أكثر من المرة السابقة لاستمرار إنتاجيته. من ناحية 
أخرى» عند قيام المخربين بنسخ ما جفت عليه أقلامي من التعب»› 
وبادر الجميع بخرق قانون حماية الملكية الفكرية» فستجد الإحباط 
واليأس عند هذا الشخص ما الذي لا يعلمه إلا الذي ذاقه فقط بل قد 
تصل الأمور إلى كره المجتمع الذي حولهء وعد التفكير مطلقا بنفعهم 
أو تطويرهم» وإن كان شخصا محظوضا قد يبدأ يفكر في السفر أو 


الهجرة» أو تجده في المقاهي يسب ويشتم ويمارس حياة بائسة تقليدية . 


الدعوة إلى الابتكار رزرا)هع])» كما ذكرت في بداية هذا 
المقالء فإن العقل البشري هو أثمن وأغلى مصدر على أي دولة الحفاظ 
عليه وحماية حقوقه» ولا يختلف شخصان على أن تطور الأفراد 
والمجتمعات ناتج من الابتكار وخلق آفكار جديدة والتفكير في حلول 
تزيد من إنتاجية الفرد والمجتمع. من التقافات التي تربينا عليها منذ 
نعومة أظفارنا - نتيجة للعوامل التعليمية والاجتماعية- هو الانقياد 
وعدم التفكير مطلقا في استخدام كلمة «لمادا؟» فتجدنا منقادين دون 
أن نعرف لماذا وإلى أين ننقادء ويصبح تفكيرنا محدوداً لا يتعدى نطاق 
المكان الذي سنقضي فيه الليلة بعد نهاية يوم العمل أو مكان قضاء 
العطلة الصيفيةء وهذا الشيء - مع الأسف الشديد - منغرس فينا 
وفي تقافتنا. إما أن بدأ الشخص يسأل ويكثر من استخدام الكلمة 
«لماذا؟» فهنا ستكون بداية الطريق إلى عالم الابتكار والنظر إلى 
الأمور من زوايا أخرى» فعندما أرى مشكلة ما في جهة تنظيمية 
أستطيع أن أطرح أسئلة لماذا؟ لماذا لا نقوم بتغيير طريقة إجراء هذه 
المعاملة حتى نختصر الوقت» لم لا نقوم بتحويل استخدام هذه الخطوات 
من قاعد ورقية إلى قاعدة معلوماتية؟ وغيرها من الأسئلة التي تنتج في 
النهاية أفكارا وحلولا جديدةء فالحاجة هي آم الاختراع. إن نظرنا إلى 
مجتمعنا السعودي بشكل خاص؛ فلديه من الطاقات الكامنة التي 
تساوي ملء الأرض ذهباًء وأختص بالطاقات الكامنة هنا بالطاقات 
العقلية في العنصر البشري» التي إن استثمرت بشكل صحيح ستغطي 
ما يقلل اعتمادنا على المصادر الأخرى» فهذا شاب له من الأفكار 
الكثير» وهذه شابة لها من الإبداعات مايفوق التوقعات» وعدم وجود 
الفرص السانحة لهم والإمكانات شيء محبط ومغيظ وقد يحول 
الإنسان من شخص منتج إلى مستهملك. والتجربة الهندية خير 
دليل» فقد أصبحت الشركات الأوروبية والأمريكية تستورد عشرات 
الألاف من الهنود سنويا بسبب عقولهم. 


أثبت قانون حماية الملكية الفكرية وعوده عند تطبيقه 
في الدول المتقدمة بهمدف حماية عقول الأفراد وانتاجاتهم الفكرية 
في المجتمع» وهو يؤدي إلى زيادة نمو المجتمعات من نواح عدة 
كالنواحي الاقتصادية والتنموية والبشريةء وهو أيضا العامل الرئيسي 
لخلق أفكار جديدة وتطوير الصناعات. ولو نظرنا في شريعتنا 
السمحة» لاكتشفنا أن الدعوة إلى حماية الملكية الفكرية منذ 1400 سنة 
مذكورة في القرآن الكريم في قوله تعالى بسورة النساء (( يا أيها الذين 
امنوا لا تأكلوا أموالكم بينكم بالباطل إلا أن تكون تجارة عن تراض 
منكم )) وفي سورة البقرة (( ولا تأكلوا أموالكم بينكم بالباطل )) ... 
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حموایۂہ الملکیۂہ الفکریہ .. حمایۂ للعقل 


وفي الختام» عند تطبيق حماية الملكية الفكرية (بشكل واقعي وليس 
ورقي) فلا تستبعد يوما من الأيام قراءة عناوين في الصحف شبيهه ب : 
ه وفقا لإحصائيات عالميةء السعوديون أفضل مبرمجين حول العالم ! 


٠‏ وكالة ناسا الفضائية تستقطب استشاريين سعوديين لدعم أحد 
مشاريعها ! 

زيادة البعثات الدراسية من حول العالم إلى المعاهد والجامعات 
السعودية لتعلم التقنية ! 

! تعتمد أنظمتها الجديدة باشراف شركات سعودية‎ ١١ قناة‎ ٠ 
هل تود قراءة مثل هذه العناوين يوماً ما؟ وكيف سيكون شعورك إن‎ 


تحفقت؟ 


gيlعتلل‎ )(WIPO0٥/OMP1 Academy) الفكرية‎ 


عن بعد. 


كما لا يخفى على أي مبرمج, فإن حماية البرامج التي تعب في 
تطويرها أمر هام جدا ولذلك عليه أن يكون ملما بالحقوق التي تكفلها له 
قوانين الملكية الفكرية و كذلك التقييدات. 


لذلك أنصحكم ب"التفقه" في هذا المجال و ذلك بدراسة الخطوط 
العريضة للملكية الفكرية عن طريق البرنامج الذي تديره الويبو للتعليم 
عن بعد. 


التسجيل في البرنامج مجاني للعرب و ذلك على الموقع التالي: 
http://academy.w1po.1nt/ar/default2.asp‏ 


وواعيد التسجيل: هناك فرصتان سنويتان للتسجيل 
الأولى: من 1 ديسمبر /كانون الأول إلى 30 يناير/كانون الثاني. 
الثانية: من 1 يوليه/تموز إلى 30 أغسطس/آب. 


ب اال عمل السحل مكل رمال الك وة فيا مغرمات 
التسحل القاص نكت 


بعد التسجيل عليكم الانتظار حتى تاريخ بداية الدورة التدريبية التي تنظم 
كما قلنا مرتين في السنة:من 1 مارس/آذار إلى 15 أبريل/نيسان و من 
1 أكتوبر/تشرين الأول إلى 15 نوفمبر/تشرين الثاني. 


كما ترون, فإن الدورة تدوم 6 أسابيع. 


الدورة التدريبية عبارة عن مجموعة من الدروس منظمة في محاور و 


وحدات: 


للوشاركة أو الاستفسار زوروا ووقعنا على illت vb4arab.c0(m‏ 


0 7~ 


ترکي العسيرى 


الوح رق ]1 مدل لے الا اکر 
-الوحدة رقم 2 : حق المؤلف. 

-الوحدة رقم 3 : الحقوق المجاورة لحق المؤلف. 
-الوحدة رقم 4: العلامات التجارية. 

-الوحدة رقم 5 : البيانات الجغرافية. 

اح رف 6 :ال سرو آي الما اا اع 
-الوحدة رقم 7 : البراءات. 


-الوحدة رقم °8 الاتفاقيات المتعلقة بأنظمة التسجيل الدولية اللي 
تدير ها الويبو. 


-الوحدة رقم 9 : المنافسة غير المشروعة. 

-الوحدة رقم 10 : حماية الأصناف النباتية الجديدة. 

-الجزء 11 : ملخص ونقاش. 

-الامتحان الختامي.101 ا5 

يمكنكم مزاولة الدراسة مباشرة على الخط أو تنزیل ملفات ال ٥5۴‏ 


الخاصة بالدروس. 


كل وحدة تتوج بامتحان نهاية الوحدة (امتحان تجريبي) الذي يختبر 
مدی متابعتکم للدروس. 


بعد انتهاء تاریح إتاحة الدورة, يمنح لکم سبو ع للمراجعة قبل التقدم 


الامتحان الختامي يتكون من 36 إلى 40 سؤال ذات خيارات متعددة 
MCQsS‏ 

إذا تحصلتم على %50 إجابة صحيحة تعتبرون ناجحين و تحصلون 
على شهادة اعتراف عالمية من المنظمة العالمية للملكية الفكرية ترسل 
لكم إلى المنزل في مدة أقصاها شهرين 02. 


كما أن النجاح يمكنكم من الالتحاق بدورات تدريبية احترافية أخرى 
تدير ها نفس الأكاديمية. 


ولاحظات أخيرة 

-عليكم إدخال الاسم و اللقب الصحيحين عند التسجيل لأنهما سيظهران 
في الشهادة. 

- تقديم العنوان الالكتروني الصحيح الذي تستعملونه دائما لأنه 
ضروري للتواصل مع المدير و الأساتذة. 


وليد بوالطمين 
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حرایۂہ الملکیہ الفکریۂہ .. حمایۂہ للعقل 
تركي العسيري 


اتم بنجاح 
الدورة التالية للتعليم عن بعد 
من ١‏ آذار/ مارس 2007 إلى 15 أبريل/ نيسان 2007 


ت 


للمشاركة أو الاستفسار زوروا موقعنا على النت v۷b4a۲ab.٥c٥۳١‏ العدد 01 لشمر ينابر / فبراير من سنة 2008 


كيف نحل مشاكلنا بانفسنا؟ 


أولا السلام عليكم ورحمة الله وبركاته.... 


وثاني] تواصلاً لمشاور السلسلة الذهبية في المواضيع العلمية سوف 
نناقش اليوم موضوع يهم المبتدئين بشكل أساسي وهو كيفية استغلال 
معلوماتك البسيطة في تكوين فكرة عن حل المشكلة أو الموضوع الذي 
تنوي برمجته تم ننتقل بإذن من الله تعالى وتوفيق إلى بعض 
الاختصارات و الأفكار البرمجية البسيطة التي بالتأكيد سوف تستغلها 
في العديد من برامجك القادمة وذلك في الموضوع التالي من حلقات هذه 
| لسلسلة إن شاء الله تعالى ... واخص حديتثي هذا بأخوتي حديثو العهد 


الأسلوب الذمثل في حل الوسائل البرمجية 


في كثير من الأحيان نواجه مشاكل بسيطة لا نوفق في حلها 
وتتسبب في تعطيل سير عمل برنامجنا... و هنا ينتهج البعض منا 
أسلوبا خاطتا في البحث عن الحل وهو الهروع إلى طلب المساعدة 
سواءَ من صديق أو من منتديات البرمجة المنتشرة في الشبكة ومنتدانا 
هذا واحد من أبرزها ... وهذا الأسلوب و إن كان الأسرع فهو احد 
الأسباب الرئيسية لإعاقة تقدمك في عالم البرمجة ذلك انك بالتدريج ومع 
تكرار انتهاجك لنفس الأسلوب تفقد القدرة على ابتكار حلول من عندك 
بل انه مع مرور الزمن سوف تجد أن ابسط المسائل البرمجية تمثل 
عندك عقبات كبيرة يصعب عليك التخلص منها... 


وأما الطريقة المناسبة في مواجهة المسائل المعقدة هي أولا 
محاولة فهم الأمر فهما صحيحاً ثم الشروع في محاولة الإجابة بعدة 
طرق والبحث في جميع الأدوات أو الأوامر التي يمكن أن يكون لها 
علاقة بالموضوع وسوف اذکر بعد قلیل مثال بسیط تم نری کیف یمکننا 
أن نجيب عليه بأكثر من طريقة ثم انظر أي الطرق كنت ستتخذها في 
حال طلب منك برنامج كهذا... 


وما الطريقة الثانية فهي البحث في ملفات المساعدة عن 
إمكانيات اللغة التي تستخدمها ) لغة البرمجة طبعاً وليست اللغة الطبيعية 
) فأنت لا تعلم كم ستستفيد من هذا البحث فقد تبحث عن موضوع وتجد 
أمثلة و دوال لم تكن تعلم بوجودها أصلا بل إنني أتذكر أحيانا كثيرة 
الموضوع الذي كنت ابحث عنه لما أجده من الفوائد العظيمة والمواضيع 
الشيقة أثناء بحثي خاصة إذا كنت تتجول في مكتبة ال.... M١8١‏ 


وما الخطوة الأخيرة فهي التي تلجأ فيها إلى المساعدة من 
أشخاص تعرفهم ومن منتداك هذا بالطبع ... ولكن بشرط واحد هو أن 
تعي وتفهم الحل الذي ستجده وتحاول كتابته بنفسك بعد أن تفهمه جيداً... 


(ولا تنسى أن تدعو بالخير لأخيك الذي أعانك في حل المسألة...) 


وبعد أن تعرف حل هذه الم لمشكلة حاول نقلها لمن تظن أنهم 
سیستفیدون منها.... 


للمشاركة أو الاستفسار زوروا موقعنا على النت ٠0ء.ط42۲aط۷‏ 


رغيدطيب 


متال يستحق التامل 


دعنا الآن نرى كيف يمكن التعامل مع هذه المشكلة البسيطة.. 
لنفرض انك كنت تقوم بتصميم برنامج لتعليم الصغار الرياضيات 
وترید أن تختبر الأرقام الذي يدخلها الطفل ثم تساعده في معرفة العدد 
الفردي منها من العدد الزوجي!! .. 


للقيام بمتل هذا البرنامج يجب عليك أنت أولا معرفة الرقم الفردي من 
الزوجي بطريقة برمجية فلنفرض انك قمت بقراءة الرقم الذي ادخله 
المستخدم في متغير عددي أسميته N‏ بالطريقة التالية: 
کود: 
Dim N As Integer‏ 
(( ا3خل ان كلة صح" :125086( N. = val‏ 


والآن كيف يمكن معرفة أن الرقم المخزن في المتغير ١N‏ هو عدد 
فردي آم زوجي ؟؟؟ 


طبعا إذا كنت ممن لهم باع طويل بالبرمجة أظنني أراك الآن تبتسم 
من سذاجة السؤال - ولكن انتظر قليلا دعنا ندرس الأمر أولا فبعد 
قليل سوف اطلب منك حل المسألة بأكثر من ثلاث طرق مختلفة - 
..... و أما إذا كنت مبتدئا أو ممن اعتاد عدم بذل مجهود في البحث 


عن إجابة قد تجد أن هذا أمر محير فعلاأً حتى وان طلبت منك إيجاد 
اکل ر اس د رل مک 


حاول الآن معي تتخيل الطرق التي يمكن أن تجيب بها على هذا 
السؤال البسيط قبل أن نبدأ في خطوات الحال التالية ... 


سوف ندرس فيما يلي الأمر كما ينبغي على الفرد أن يناقشه مع نفسه 
في كل مرة يواجه فيها سؤال مشابه يحتاج إلى شيء من التفكير... 


الحل الأول للوسالة 


الأمر الذي ينبغي أن تذهب إليه عقولنا جميعا هو 
الرياضيات فما هي الطريقة التي نفرق فيها بين العدد الفردي والعدد 
الزوجي رياضياً... طبعا جميعنا يدرك أن الرقم الذي يقبل القسمة على 
اثنين بدون باقي - أي أن الباقي صفراً - فهو عدد زوجي وآما الذي 
ينتج عنه باقي بعد قسمته على 2 فهو عدد فردي... وهدا أمر بديهي 
... إذا ما يتوجب علينا التفكير فيه هو ما الأمر أو المعامل الذي 
يمكنني أن استخدمه في لغتنا الفيجوال بيسك للحصول على باقي 
القسمة .... أظن الجميع الآن يعرف الإجابة طبعاً المعامل |0١0‏ فهو 
يستخدم للحصول على باقي القسمة .... وأما إذا كنت لا تعرف هذا 
المعامل فإليك هذه الأمثلة السريعة: 


= 12 Mod 3 
= 6 Mod 2 
= 7 Mod 2 
= 15 Mod 4 
= 9 Mod 7 


N u د۳۳3‎ 0O O 
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كيف نحل وشاكلنا بانفسنا؟ 


فالسطر الأول يدل على أن باقي قسمة 12 على 3 هو صفر لأنه ينتج 
من القسمة 4 والباقي صفر. 


وإما السطر الثاني فهو أيضا صفر لان ناتج قسمة 6 على اثنين هو 
ثلاثة والباقي صفر. 


والثالث كان الناتج فيه هو واحد لان ناتج قسمة 7 على اثنين هر 3 


وكذلك الحال في السطر الرابع فان ناتج قسمة 15 على 4 هر 3 
ولاق 


وأما السطر الأخير فان ناتج قسمة 9 على 7 هو واحد والباقي 2... 


والآن من السطرين الثاني والثالث نرى بوضوح أن قسمة عدد زوجي 
( 6 في السطر الثاني) على 2 يبقى صفرآ... بينما ناتج قسمة عدد 
فردي ( السبعة في السطر التثالث ) على اثنين فان الباقي هو واحد... 


وبالتالي فإننا يمكن أن نستغل المعامل "٠١‏ في البرنامج كالتالي: 


کود: 


Dim N As Integer 


N = va I (SpE Bo: (ma u 77ل اھ‎ 
IN Mol 2Z =U TREN 

MSE: "Ja E 
ELSE 

MSGEOS “Ej a" 
ENT LF 


ها الل كان من امرض ن دمه لذن بعر دون الفعافل وا 
الحال الثاني لهذه المسالة 


لنفرض الان انك لم تكن على دراية بوجود هذا المعامل في 
الفيجوال بيسك فليس من الممكن أن تستخدمه مع عدم درايتك به أصلا 
.... إذا أنت الآن ملزم بالبحث عن بديل فليس من المعقول أيضا أن 
تعيقك متل هذه المشكلة في مثل هذا البرنامج الموجه للصغار!! 


والآن دعنا نفكر عن بديل طبعاً سيبقى مجال تفكيرنا رياضيا حيث أن 
الموضوع يتعلق بالرياضيات ( فليس من المعقول أن نبحث عن حل 
بین دوال الرسم مثلاً مثل ٥٣آ‏ و ©۲٥۱6...‏ ) لهذا سوف نستفید من 
معاملي القسمة الذين يقدمهما لنا الفيجوال بيسك فكلنا يعلم معامل 
القسمة العادية وهو / .. فمثلا: 


کک لا لن لنت N‏ 


الكل يعلم النواتج السابقة لأنها عبارة عن قسمة عادية ... ولكننا سوف 
نستخدم إلى جوار هذا المعامل معامل آخر يهمنا في حل هذه المسألة 
وهو المعامل | وهو معامل عكس معامل القسمة العادية /... 


للوشاركة أو الاستفسار زوروا ووقعنا على النت ص۳هء.طaإ4aطv‏ 


رغيدطيب 


ويستخدم هذا المعامل في إيجاد ناتج القسمة بدون باقي أي أننا إذا 
قسمنا خمسة على 2 فان الناتج هنا سيكون 2 وليس كما اعتدنا اثنين 
ونصف و ذلك لان هذا المعامل يهمل الباقي ويكتفي بالناتج دون 
باقي... ولمزيد من الأمثلة انظر إلى السطور التالية: 


یں لن N»‏ 
1 


نرى بوضوح أن ناتج السطر الأول هو أربعة لان ناتج قسمة 12 
على 3 هو 4 بدون باقي... 


وفي السطر الثاني أيضا فأن الناتج من قسمة 6 على 2 هو 3 والباقي 


وأما السطر التالث ففيه 7 قسمة 2 هو 3.5 ولكن لان القسمة هنا هي 
بدون باقي فان الناتج هو 3 فقط... 


وكذلك السطر الرابع فأن ناتج قسمة 9 على فقط.و 2.25 ولكن الناتج 
هو بدون باقي آي انه 2 فقط... 


لهذا فننا نخرج باستنتاج أن القسمة باستخدام المعامل "/" هي قسمة 
عادية.. 


و أما القسمة باستخدام المعامل "ا" فهي قسمة بدون باقي... 


والآن كيف يمكن أن نستغل هذين المعاملين في برنامجنا القديم... 
الإجابة ستكون باعتماد ناتج القسمة من المعاملين على العدد الذي 
نريده فمثلاً إذا قمسنا عدد زوجي على 2 باستخدام القسمة العادية فان 
الناتج سكون بدون باقي لأن العدد الزوجي يقبل القسمة على اثنين 
بدون باقي وأما إذا قسمنا العدد الزوجي نفسه على انين ولكن 
باستخدام القسمة بدون باقي فسوف ينتج أيضا نفس الناتج من القسمة 
العادية لأنه لا يوجد باقي أصلا خذ مثلاً: 
C2 E‏ 
2 6 
لا بالطبع نتيجة قسمة 6 على اثنين هو ثلاثة في الحالتين... والآن 
دعنا نجرب مع عدد فردي فمثلاً إذا قسمنا السبعة على 2 قسمة عادية 
فان الناتج هو 3.5 بالطبع... ولكن إذا قسمنا نفس العدد - السبعة - 
على اثنين ولكن بدون باقي أي باستخدام المعامل "ا" فان الناتج في 
هذه الحالة هو 3 فقط بدون باقي... انظر المتال: 


= 35 
ت‎ ١ 


قسمة بياقي 2 / 7 
من الواضح الآن أن ناتج قسمة عدد زوجي على اثنين هو نفس الناتج 
في حال استخدمنا القسمة بباقي أو القسمة بدون باقي... وأما إذا قسمنا 
عدد فردي على 2 فان الناتج يختلف فيما إذا كانت القسمة بباقي أو 
بدون باقی 
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Mk =‏ = . 
كيف نحل وشساكلنا بانفسنا؟ 
لهذا كله يمكننا الآن استخدام هذه الميزة لجعل برنامجنا يبدو كالتالي: 


کود: 


Dim N As Integer 
N =2 TAL {(TOpUTEEOS (ma ا اي‎ ( 
TET (OM 2= DN 7 2y Thanh 
MSGEOX “qo, l8" 
Else ۰ 
MSGEOXK 
Has Es 


لاحظ أن الشرط كان هو انه اذا تساوى حاصل القسمة بدون 
باقي مع حاصل القسمة بباقي فأن الرقم في هذه الحالة هو عدد زوجي 
وأما إذا لم يتساوى الناتجان فان العدد هو عدد فردي ولا ريب... 


E‏ روي 


الحل السابق كان من المفترض أن يستخدمه من كانت لهم معرفة سابقة 
بمعاملات القسمة العادية والقسمة بدون باقي.. 


الحل الثالث (حل تنائي) 


لقد كان الحلان السابقان جميلان جدا و يفيان بالغرض تماما 
ولگن ما ا لم تكن ترف وجرة العامات السافة ر( ال هو 
والقسمة بدون باقي | ) في هذه الحالة لن تكون إجابتك مشابهه لإحدى 
الطريقتين السابقتين وسيكون من المفترض عليك أن تجيب على 
السؤال المطروح هنا وهو كيفية التفريق بين الإعداد الزوجية والفردية 
برمجياً ؟... 


نعرف جميعا أن الكمبيوتر الذي نجلس الآن أمامه يعمل على 
نظام واحد وهو النظام الثنائي ( صفر و واحد )... وهو أمر نسلم به 
جميعا وإن كنا نواجه صعوبة في فهم كيف تكون الصور التي نراها 
في الشاشة والأصوات التي نسمعها من السماعات هي جميعها ناتجة 
عن هذا النظام الثنائي ( 0010100100100) شيء غريب بالفعل.. 
ولكن مع تعمقك أكثر وأكثر في الأمور البرمجية خاصة المتعلقة منها 
بالبايت (ع1ل8)والبت (8) سوف تبدأ تشعر بتأقلم مع تقبل فكرة أن 
كل شيء يعمل بالفعل بهذا النظام العجيب!! 


سوف نحاول هنا أن نستغل هذا النظام في الحل الذي نبحث 
عنه مستغلين هنا المعاملات المنطقية وبالذات المعامل ۸1١...‏ ولكن 


قبل هذا ينبغي أن نعرف أن لكل رقم نستخدمه في النظام العشري ما 
يقابله في النظام الثنائي. 


ما يهمنا هو المعامل .۸ وكيف يتعامل مع الأرقام وهذا 
المعامل المنطقي يدخل ضمن عدة معاملات أخرى مثل 0۸ و 08× 
و ۳07 وغيرها ...والجدول المنطقي المرتبط بالمعامل ۸٣١‏ هو 


کالتالی: 
And 0 = 0‏ 0 
And 1 = 0‏ 0 
And 0 = 0‏ 1 
LARC LZ‏ 
EE‏ 


للوشاركة أو الاستفسار زوروا ووقعنا على النت n٠٥0ء.طvb4ara‏ 


o ٨~ 


رغيدطيب 


و نرى بوضوح أن الناتج دائماً هو صفر إلا في حالة واحدة 
هي أن يكون الرقمين الذي تتم مقارنتهما ب 21١‏ هماواحد ... وهذه 
المقارنة تتم على مستوى البت أي على المستوى الثنائي فمتلا اذا 
قارنت الرقمين التالين ب ل,حA:‏ 


12 And 6 = 4 

لماذا كان الناتج هو 4 يجب أولا أن نحظر الأرقام 6 و 12 بالنظام 

فال 12 يمثل الرقم 1100 و أما الستة فرقمه هو 0110 وبالتالي فان 
مقارنتهما تتم بالشكل التالي: 


1100 And 0110 = 0100 


لاحظ أننا نقارن كل بت من بتات الرقم 12 مع البت الذي 
يماثله(تحته مباشرة) في الرقم 6 اعتمادا على المعامل ۸۵ فإذا کان 
هناك 1 وتحته مباشرة 1 أخر فان الناتج هو 1 وغير ذلك فان الناتج 
هو 0 ويظهر بوضوح أن ال 12 و 6 يشتركان في أن البت الثالث 
(من اليمين) هو واحد لهذا فأن الناتج سوف يكون أصفار ماعدا البت 
الثالث فهو واحد أي أن الرقم الناتج هو 0100 وبنظرة سريعة يمكن 
أن تعرف أن هذا الرقم الثنائي يمتل الرقم 4 في النظام العشري... 


والآن لننتقل إلى ما يهمنا في هذا كله لنفرض أننا قارنا أي رقم مع 
الرقم 1 والذي يمثل 0001 في النظام الثنائي فان الناتج في هذه 
الحالة إما صفر أو واحد وهذا يعتمد على البت الأول في الرقم متلا إذا 
قارنا الرقم 7 مع الواحد: 


| 
ل 


OL 
ونرى بوضوح أن ناتج المقارنة كان واحد لان السبعة يحمل الرقم‎ 


أما إذا قارنا الرقم 6 مع الواحد في الناتج في هذه الحالة هو صفر لان 
البت الأول من اليمين للستة هو صفر 0110 وذلك كما يلي: 


| 
0 


0000 

وبهذا فان الناتج يكون صفر إذا كان الرقم يبدأ من اليمن 

بصفر ويكون واحد إذا كان الرقم يبدأ بواحد ... و بنظرة سريعة إلى 

الجدول السابق سوف ترى بوضوح أن جميع الإعداد الزوجية تبدأ 

بصفر والأعداد الفردية تبدأ بواحد لهذا يمكن بسهولة استغلاله في 
برنامجنا بالشكل التالي: 
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Dim N As [Integer 
N = val (Input Box ("حqzص اي عدد‎ 7 
If (N And 1) = 0 Then 
MS;GEBOS am) "غد‎ 
EL 
MSGEO ao “ا‎ 
ENG IT 


لاحظ أننا استخدمنا معرفتنا السابقة بان مقارنة العدد الزوجي 


مع الرقم واحد ينتج عنها صفر ومقارنة العدد الفردي مع الواحد ينتج 


هذا الحل لن يستخدمه إلا من كانت له دراية بالنظام الثناتي 
E ERDA‏ 


الحل النهائي 


لنفرض الآن أني لم تكن لدي الخبرة الكافية في المعاملات السابقة 
جميعا و ليس لدي غير الأشياء الأساسية في اللغة أي مثل المقارنات 
ب 1£ و أوامر الدوران ه۴ و 11٤1ل‏ و N1116...‏ فهل يعني 
تصميم البرنامج بشكل كامل ؟.... 

الإجابة هنا هي بالطبع... ل!!! 


بل يمكن لك أن تقوم بعمل بسيط باستخدام الدوران وسوف تحصل في 
الأخير على ناتج مشابه و إن كانت النتيجة ستكون اقل كفاءة 
وسرعة... ولكنها ستكون بالتأكيد أفضل من أن يتوقف البرنامج كليا... 


ر القر هت باط ھی ما لی عا دورن سط ره 
فيه في كل مرة بتنقيص الرقم الذي معنا بمقدار اثنين بحيث يتوقف 
الدوران عندما يصبح الرقم اقل من اثنين... فان الناتج في هذه الحال 
سيكون دائما إما واحد(في حالة الإعداد الفردية) أو صفر ( في حالة 
الإعداد الزوجية ) 


خذ مثلاً الرقم 5 إذا أنقصنا منه 2 سوف ببقى 3 ولأنه لیس 
اصغر من اثنين نقوم بالتنقيص مرة أخرى فيصبح لدينا الآن 1 وهو 
رقم اصغر من انين الان نقارن إذا كان صفر فهو زوجي وان کان 
واحد كما في هذه الحالة فهو فردي... 


وإذا قارنا برقم زوجي لنقل ال 6 مثلا فانه في المرة الأولى ننقص 2 
فیبقی 4 تم ننقص 2 فیبقی 2 تم ننقص 2 فيبقى صفراً وهنا نتوقف عن 
التنقيص لان الرقم المتبقي اصغر من اثنين ( بقي صفراً ) وهذا يعني 
أن الرقم زوجي... 


يمكن ترجمة ما سبق بدوران بسيط ينقص 2 في كل مرة 
ويتوقف عندما يكون الرقم اصغر من 2 تم نقارن بالشكل التالي: 


للمشاركة أو الاستفسار زوروا ووقعنا على النت ص0۳ء.ط4a۲aطv‏ 


Dim N As [Integer 

N = val (InputBox ("zızڊص (("ادخل أي عدد‎ 

DG UCL NDE 

کک 

LOOP 

lf N = 0 Then 
Msg°B0OX زوجي"‎ 

Else 


ا 


۳ 


MéGEBOX “jS 
ERC LT 


وبهذا نكون قد انهينا حل المسالة بطرق مختلفة وطبعا يمكن 
لكل شخص إن يبتكر طرق أخرى ولكني اكتفي هنا بهذا الحد.... 


كلوة أخيرة لتوضيح المقصد من الموضوع ككل 


عشنا سويا فيما سبق دقائق جميلة في محاولة حل مسألة 
بسيطة وسعينا فيها إلى التوضيح بان كل واحد منا قادر على إيجاد 
حلول وابتكارها من العدم وينبغي فقط عدم احتقار قدرات عقولنا 
البشرية الذي منحنا إياها الله تعالى... وعدم اعتمادك على الغير بقدر 
الإمكان فقليل جدا ممن سيقرئ الموضوع سيجد انه لم يكن يعرف أيا 
من الحلول السابقة وآخرون سوف تجدهم يعرفون معظم المعاملات 
التي ذكرناها ولكن لم تخطر لهم الفكرة في استخدامها وإما الباقين 
فسوف يشعرون بان كل ما سبق كان مضيعة للوقت وان هذه جميعها 
طرق بسيطة ويمكن أن تكون في رؤسهم الكثير من الطرق الأفضل 
من هذه ... و طبعاً سيكون هذا بسبب أنهم لم يركنوا عقولهم بسرعة 


لهذا كله نخرج آنا وأنت عزيزي القارئ بنتيجة مهمة وهي 
محاولة البحث عن الحل بكل الطرق الممكنة ثم اللجوء بعد ذلك 
للمساعدة كما انك يمكن أن تزيد من استفادتك إذا سعيت لإيجاد الحل 
ثم قمت بطرح الطريقة التي توصلت إليها في المنتدى مع السؤال عن 
وجود طرق أفضل فأن هذا سيكون أفضل بكثير من السؤال المباشر 
عن الحل ... وسوف يتحول سؤالك المطروح في المنتدى .... من 
الصيغة: 


هل توجد طريقة لعمل كذا و كذا ؟ 
هل توجد طريقة أفضل من هذه التي توصلت إليها لعمل كذا وكذا ؟ 


E Oo o 
كط فى يحض المرات لى طب الساعة وسرف تت فى انا‎ 
من يسره كثيراً أن يمد يد العون لك ولكن كن متأكدا من انك قد‎ 

استنفدت كل ما في جعبتك من طرق لحل المشكلة.... 


والسلام عليكم ورحمة الله ويركاتال.. 
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جوال الشكل وفساد الروح 


الكبر الكبر - اللهم أغثنا- 
الشكل: مبرمج مطور محترف ومميز. 
الرود: متكبر صاحب غرور بالنفس. 


النتيجة: خاسر للدنيا والآخرة 


الخد هلكا اارى اتور الي الل التكر. 
الجبار الذي كل جبار له ذليل خاضع» وكل متكبر في جناب عزه 
مسكين تواضع» وأشهد أن لا إله إلا الله وحده لا شريك له القهار الذي 
لا يدفعه عن مراده دافع» الغني الذي ليس له شريك في الملك ولا 
منازع» وأشهد أن محمدا عبد الله ورسوله بعثه الله لأهل الهدى نجم 
ساطع» وعلى أهل الفجور والخنا سيف قاطع صلى الله عليه وعلى آله 
وصحبه وسلم ما سجد لله ساجد أو ركع لله راكع. 


أما بعد: 

فأوصيكم عباد الله بوصية الله للأولين والآخرين إذ يقول: 

[.. وَلقذ وَصَيْنًا الذين أووا الكتاب مِن قبلِخم ويام أن 
افوا الله ون تكفرُوا فن له مَا فِي السَمَاوَات وَمَا فِي الأرٴض 
وگان الله عَنِيًا حمِيدا ] 
العنوان يوحي بمراد المقال ألا وهو فساد الجوهر مع جمال المظهر 


وكلامنا هنا عن خلق هام لكل من أراد أن يكون حامل لعلم من العلوم 
التي أنعم بها الله سبحانه على خلقه بامتنانه 


وهنا حوارنا عن علوم البرمجة والتطوير التكنولوجي. 


ومن أكثر الأشياء فساداً للجوهر عن كثير ممن سلك هذا المضمار 
تعظيم النفس والاستكبار والغرور. 


وهذه آفات أعاذنا الله وإياكم منها - قاتلة لصاحبها ليس لأنه سيكون 
منبوذ في وسطه فليس هذا شرطا فکثیر من نراه مغرور ویلتف حوله 
أقرانه ربما لحاجتهم له» لكن هي قاتلة لأن الله أوعد وهدد صاحبها 
بالعاقبة السوء في الدنيا والآخرة. 


وسنبداً بالحوار عن مرض الكبر والاستكبار 


وما اسر ع آلكر الى آهل اا فا لت أن تعر فى تفه كمال 
العلم » فيستعظم نفسه ويحتقر الناس ويستجهلهم ويستخدم من خالطه 
منهم وقد یری نفسه عند الله تعالى أعلى وأفضل منهم. 


للموشاركة أو الاستفسار زوروا ووقعنا على النت ص0(mضvb4arab.c‏ 


o ~~ 


BADRMEÊEDI1A ڇرaq‎ دaحأ‎ 


صاحب الكبر بعيد عن الحق والدیں 
قول تعالی: 


افر کے ایی کی نے ای یکر ال ر 
يروا کل آي لا يُرْمئوا بها وَين يروا سَبيل الرُشند لا يتوه سبي 
وٳڻ يروا سيل العَي يٿخوه سبيئا لك باه گڻبوا باياٽا وگائوا 


0 ت 
3 


عذها غافلين] سورة الأعراف - الآية 146- 


المتكبر يختم القدير على قلبه فلا يميز بين الحق والباطل يقول الله جل 
جلاله: [كذلك يَطبّع الله على كل قلب متكبّر جَبّار]) سورة غافر - 
الاي 35- 

- المتكبر هالك هالك ألا يعلم أنه ينازع من !!!! الله ( الملك 
)» فعن أبي هريرة رضي الله عنه قال: قال رسول الله صلی الله عليه 
وسلم: ((يقول الله تعالى:الكبرياء ردائي والعظمَةٌ إزاري فمن 
نازعني واحداً منها آلقيتة في جهنم ولا أبالي)) رواه مسلم. 


- إن الكبر أمره خطير فيكفي المرء أن يكون في قلبه مثقال 
ذرة من كبر ليحرم الجنة ونعيمهاء فعن عبد الله بن مسعود رضي الله 
عنه عن النبي صلى الله عليه وسلم أنه قال: ((لايدڅل الجئة من كان 
في قلبه مِثقال ذرَةٍ مِن كبر ..)) رواه مسلم. 


بل المتكبرون هم أول من تبحث النار عنهم يوم القيامة. 
أخرج الترمذي عن أبي هريرة رضي الله عنه قال: قال رسول الله 
صلی الله عليه وسلم: ((يخرج من النار عق ل أذنان تسمعانء 
وعينان تصران»ولسان ينطق» يقول: ولت بثلاثة. بكل جبار 
عنيدٍ » وبكل من دعا مع اله إله آخر» وبالمصورين)) 


يا الله 


يقول صلى الله عليه وسلم : ((يحشر المتكبرون على 
أمثال الذر“ (أي صغار النمل)في صور الرجال يغشاهم الذل من 
کل مکان»يساقونَ إلى سجن في جهنم يقال له بُولس٬تعلوهم‏ نار 
الأنيار يُسقون مِنْ غصارَة أهل النار طينة الخبال)) (النسائي 
والترمذي). 

الكبر إحساس بالعظمة في النفس ينعكس في صورة 


تصرفات المتكبر» فإما أن يكون اختيال في المشية أو إعجاب بالرأي 
حيث يرد كل رأي مخالف ولو كان حقا أو استبداد في المنصب 


والكبر من صوره تعاليك على من علمك وکان سببا فيما 
أنت فيه - أو عدم إخضاع الجنب له أو جعله نداً أو رفع نفسك عليه. 


فحتى لو كنت أعلي منه علما ومرتبة يكفي أنه كان سبباً في وصولك 
لما أنت فيه ولا تخول الأمر لاجتهادك ونشاطك - فلو لم يقدر الله لك 
فلان لن تصير لما صرت له. 
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جوال الشكل وفساد الرودج 


BADRMÊDI1A رaېş أحود‎ 


لا تكن مثل قارون - فقصص القرآن ليست حكايات قبل النوم» بل للعبرة وفهم الحكمة ومن ضاعت منه الحكمة وفهم المثل فليبك علي نفسه . 


يقول عنه صلى الله عليه وسلم: ((ثلاثة لا يْكَلِمَهُمُ الله يوم القيامة ولا يُزكيهم ولا ينظرُ إليهم ولهم عذابٌ أليم وذكرَ منهم وعائل(أي فقير) 


أعوذ بالله من الشيطان الرجيم :إ قيل اذلوا أَبْوّاب جَهتّم خالدين فيها فنس مثوّى المتكبّرين) سورة الزمر -الآية 72 - 
ودائما صاحب العلم فقير 
أنسيت قول الملك 

"وما أوتيتم من العلم إلا قليلا" 
فالعلم لا يورت لكي تتكبر به» بل يمنحك رب العالمين إياه وهو القادر علي سلبه بعد امتنانه. 


- فمن تكبر بعلم فهو من أشد المتكبرين عذابا لأنه فقير متكبر. 

- إن من الكبر أن لا تعترف بالجميل والعرفان لمن جعله الله سببا في تعلمك. 
- إن من الكبر أن لا تري من الفهم إلا أنت. 

- إن من الكبر أن تغلق على كل طالب عالم يريد أن يتعلم بابك. 

- إن من الكبر التلذذ بإذلال الغير في محاولته للتعلم. 


وليحاول كل منا أن يعالج هذا الداء في نفسه وفي الآخرين فإنه يبدأ في النفس صغيراً ثم يكبر إن لم يتدارك حتى يصعب علاجه. 


من أهم وسائل علاج ذلك تذكير النفس الدائم بأصل خلقتها وماهيتها. 


وأحيانا قد يلم بالمرء لمة من كبر فإن صرفها فإنها لا تضره بإذن الله ومن ذلك ما روي أن حذيفة بن اليمان رضي الله عنه أم الناس في 


صلاة فلما سلم قال لتلتَمِسُنٌَ إماما غيري »أو لصتن وأحداناءفإني رأيت في نفسي أنه ليس في القوم أفضل مني» فهكذا النفوس المستضيئة بنور 
الإيمان تتدارك أي غمزة من غمزات الشيطان. 


أرجو أن نكون استفدنا من هذه المقالة وأن يلهمنا الله سبحانه الفهم لمرادها 
وفحواها وأن يعذنا الله وإياكم من الكبر وأهله وأن يحرم علينا النار ويرزقنا الفردوس. 


وآخر دعوانا أن الحمد لله رب العالمين 


BADRMEDIA 
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Analysis And Design 


تطویر تطبیق متعدد الطبقات N- 116١‏ 


اعتماد تصاميم مشاريعك القادمةۃ على التصمیم متعدد الطبقات N-1 1er Appاica i1٥۸ 0٥519۸‏ یصبح مطلب إلزامی 
كلها زادت تعقيدات ومتطابات وضائف المشروع. في هذا المقال أحاول تقديم هذا الوفهوم للمبتدنين مع تطبيق مثال عملي 
وبسط جدا علیہ . 


شطيرة اللحم البقرى ("الهامبرجر٣6 "1٣01۲0‏ أو كما ينطق اسمها الكثير من العرب هامبرجل) تعتبر -في رأى الشخص- 
ابرز روز صارخ للعولوة 2117410۸ طK[|0‏ التي تواجهها المجتمعات المدنية. فوجوده أصبح في كل موكان وزمان (في الإفطار 
الغداء. العشاع. وأى وجبات جانبية أخرى)ء. لدرجة أنا لا نعلم من هم أكثر شعوب الذرض استملاكا لہ هل هم الشرق أم الغرب؟! 
ولكن (وبغض النظر عن كافة الاعتبارات العرفية الذخرى) أرى فيہ مثال تجسيدي رائع لمبداً الطبقات 11٥0۲١‏ وكيف يمكن أن 
تزيد من إنتاجية بناء وجبات الهامبرجر وكافة الساندويتسات التي تتخذ ونحنام. 


في الصورة المغرية السابقة. تبداً الطبقة العلوية 11٥‏ ١٣۴عم‏ مل بقطعة من الخبز التي تمثل الواجھۃ العلويۃ والمغلفۃ 
للساندويتش وهي نفس الطبقة السفلية. ومن تم طبقة تحتوى على تشكيلة متنوعةۃ من الخضروات 11€ Vegetable‏ . 
وبعدها الطبقة الرئيسية (طبقة شريحة اللحم ( 116١‏ أ2 )M‏ وهي أهم ما في الوجود (المحرك الأتساسي للنظامٍ C0٣۴‏ 
EN i٥‏ ) والتی قال فیما أحد الشعراء: 


أمر على الديار ديار لحم ... 
أقلب ذا الغطاء وذا الفطاء 
ووا حب القدور ن شغفن قلبي ... 


ولکنٰ حب ون سكل الوعاء 


e 


دا 


مواضیع منوعةۃ تختص بعالم تحلیل و تص 


إعداد وليد بوالطمیيںن 


تطویر تطبیق متعدد الطبقات N- 116١‏ 


كيف يوكن أن تفيدنا طبقات الهامبرجر 


إن عملية بناء الهامبرجر بهذا الشكل لها فوائد جمة لا حصر 


لها أول فائدة أراها من منظور التخصص Specialization‏ لزيادة 


الجو Quality‏ »> فهناك خباز له خبرة عشرات السنين في التعامل مع 
الدقيق لصناعة الخبزء ويمكننا أن نعتمد عليه في بناء خبز وجبتناء ومن 
ناحية الخضروات» فقد نعتمد على أحد المراكز التي تعرض أنقى 
وأفضل أنواع الخضراوات الطازجة»ء كذلك الحال مع طبقة اللحب 
يمكننا أن نتعامل مع مطبخ يأتي يوميا بلحوم طازجة ذبحت للتو› وبذلك 
تزيد الجودة راهن للمنتج بشكل خرافي بسبب تخصص كل شخص 
في بناء الطبقة المناسبةء ويبقى علينا تجميع الطبقات ومن ثم بيعها 
للمستخدم النهائي (اقصد الزبون). 


كان هذا من ناحية البناء مoناcں‏ )یره وأرید أن أتحدث 
هنا عن التنقیح ع,اععںuطء5‏ أو التعديل» فعندما نريد (مثلا) تطوير 
نسخة أخرى من الهامبرجر (نسخة خفیفة ٤)1٥‏ ٤[ع1)‏ لأاشخاص 
۲ا لتعتمد علی خبز بر (خبز اسمر )8B ٥۷۸ 8٤۵4‏ › دون تحمل 
أي تكلفة لتعديل الطبقات الأخرى (ولا أعلم من هو ذلك الشخص الذي 
يتبع حمية غذائية ويستمر على أكل الهامبرجر!). 


وعندما نفكر في التدويل 100) ٣211z‏ i0)ھہإمtم]‏ وأخذ 
الإعدادات الإقليمية ورمناةر1[هءم] بعين الاعتبار» فالمسالة لن تتعدى 
طبقة اللحم]٥‏ ۲ N٥4)‏ » فاليهود لا يأكلون لحوم الخنزير أو زيوت من 
مشتقاته» ويزيدهم على ذلك المسلمون أيضاء فلابد أن تكون طريقة ذبح 
اللحم حلال 1هاه1؛ وعند الهندوس فلا يمكن أن يكون لحم بقري (فهو 
محرم أكلها بعقيدتهم)» كل ما نحتاجه تعديل في طبقة اللحم فقط وتبقی 
عقود الموردين ؟إ0ل1ع۷ (الذين نتعامل معهم) للطبقات الأخرى كما 
هي دوں مشاکل. 


O O E 
لطبقة ال ینتم لها ((ققط) دون ان تثاثر ودون أن نحتاج إلى قدي‎ 
الطبقات الأخرى‎ 
ماذا لو ؟!‎ 


أريدك ١ا‏ لدان كا الهامبرجر دون طبقات كما في هذه الصورة: 


للمشاركة أو الاستفسار زوروا موقعنا على النت ١c0۳٥.abإvb4a‏ 


ترك العسيريى 


(إن لم تكن مستحيلة)» بل سنحتاج إلى إعادة البناء من جديد عند 
التعديلات الجوهريةء وكل المزايا التي عرضناها بالفقرات السابقة 
واختصار الوقت وتوفير الأموال (خاصة التي مع تعاقدات الموردين 
6ئهمع) لا يمكن تطبيقها هنا -أي كل تغيير بسيط بحاجة إلى 
تعديل جديد للمنتج. 


بعيدا عن الهامبرجر 


يقال أنه تو جد علاقة عكسية بين عمل العقل وعمل لمعدة 
فعندما تعمل المعدة يتعطل العقل» وبما أنى بحاجة ماسة لاستهلاك كل 
طاقة عقلك الإنتاجيةء فسأتوقف هنا عن عروض الهامبرجر وأحاول 
أن أعرف التطبيقات المتعددة الطبقlات N-Tier Applications‏ 
والتي ليست و ى أسلوب لتصميم معمlري Architecture Design‏ 
یهدف إلى ن تقسيم التطبيق إلى طبقات مستقلةء تقوم كل طبقة بأداء مهمة 
ووظيفة ((محددة)) و ((واضحة). مع التنويه بأن هذه الطبقات يمكن 
أن تعمل في نفس منصة العمل ٠0۲؟)ه۴1‏ أو منصات عمل مختلفة - 
ا يكن أن تیل مء الات امك ف حار خضي راکد ار 
عشرین ألف جهاز خادم (1٥۷إمS)‏ فهو تصميم نظري 1ھں)مep‌c«هC٤‏ 
ولیس فيزيائي [ھcزیرط۲‏ . 


وزایا/عیوب التصميم متعدد الطبقات 


عرض ابرز المزايا والعيوب بشكل مبسط ومختصر: 


الوزايا: 


- تجعل البرنامج أكثر تنظيما وتخفض تكلفة تعقيدات البرامج 
Software Complexity‏ مما تسھل عملیة بنائھا وتقل 

مخاطر ءو]R‏ فشل المشروع. 
تغيير أو تعديل الطبقات الأخرى. 

- يمكنك إضافة طبقات جديدة دون مجهود. 

- التطبيقات المعدة بهذا التصميم دائما ما تكون أكثر أمانا 
(فالثغرات الأمنية بها قليلة جدا). 

- إعادة الاستخدlم C0 Reusability‏ يمكنك تصميم 
طبقاتك بطرق احترافية حتى تتمكن من إعادة استخدامها في 
مشاریع اخری. 

ت مناسبة جدا للعمل الجماعي وفرق التطوير» حيث توضح 
مهام كل عضو بدقة ووضوح. 


العبوب: 


- تتطلب كتابة الكثير من الشفرات. 
- التوثيق «0ن†ه)مءumءD0‏ يصبح آمر إلزامي خاصة إن 
- بحاجة إلى مجهود لضمان نجاح الاتصالات بين الطبقات 


- التكرار في كتابة بعض الشفرات (خاصة شفرات القوانين 
هم في أكثر من طبقة. 
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تطویر تطببق متعدد الطبقات N- 11٥٣‏ 


قلنا أن التصميم متعدد الطبقات يقسم التطبيقات إلى طبقات 
مستقلة» وإن سألتني (أو لم تسألني) كم العدد الصحيح لهذه الطبقات؟ 
فالإجابة تبدأ من 2 إلى أقصى عدد يمكن أن تتحمله أناملك» ولكن 
التصميم ثلاثي الطبقات 3 «عاوم ١م11‏ يعتبر الأشهر والاأكثر 
إتباعا: 


طبقة العرض مآ View‏ 


Business Tier dlezÎll طقة‎ 


Data Tier ټٽتlنlیıلا طىقة‎ 


كما في الشكل السابق» يقسم التصميم تلاثي الطبقات برنامجك إلى 3 
طبقات منفصلة: 


- طبقة العرض ١ء11‏ سع۷1: تمثل طبقة العرض واجهة 
الاستخدام عمعه؟إع)مآ مء الرئيسية للبرنامج» والتي تكون بالعادة إما 
تطبيJق Web Applicationgêya gyÎ Windows Application‏ « 
وهي تحتوي على جميع الأجزاء المرئية التي تستخدم لتنفيذ الوظائف 
والأوامر المختلفة للتطبيق. 

- طبقة الأعمال إعزآ sوعمذوں8:‏ تمتل طبقة الأعمال (تسمیى 
أيضا بمنطق الأعمال cزع0‏ ssوعم1وBu)‏ الانجاز الفعلي إهمءR‏ 
ementationاpصالجميع‏ الوظائق والأوامر التي يقوم بها التطبيق› 
وقد تشمل أيضا القواعد والقوانين ومإںR‏ الخاصة ببرنامجك .الغالبية 
الساحقة من هذه الطبقات تكون على شكل مكتبة فئات yإجإط1‏ 1assاC‏ 
في ملفات ]51 . 

- طبقة البيانات 11٥۲‏ هه 5: طبقة البيانات هي الطبقة المسئولة 
عن حفظ وتخزين كافة وحدات llتآٰطبيق ‘Application Entities‏ 
يمكن لعملية الحفظ أن تكون في ملفات على القرص أو في مسجل 
النظام راائزومR‏ mءاءر؟‏ . و إن زادت البيانات وأردت سرعة 
ومرونة في التعامل معها بلا حدود» فلن تجد أفضل من الاعتماد E‏ 
خادم قواعد بياناٽت 2005 DBMS Microsoft SQL Server‏ 
ری افکل دن 


من المهم جدا جدا جدا جدا (ما أكثر استخدامي لهذا التعبير في 
جميع کتاباتي) أن تتم عملية الاتصال بين الطبقات بشكل نظامي ولیس 
عشوائي» بمعنى أن طبقة العرض -مثلا -ممنوعة منعا باتا من التحدث 
تدري ماذا يحدٿ بها ومن هو المسئول عنهاء فهي تعرف كيف تتحدث 
مع طبقة الأعمال فقط (والتي تكون متفهمة مع طبقة البيانات). 


لوشاركة أو الاستفسار زوروا ووقعنا على النث ص0ء.طaا4aطvb‏ 


تركي العسيرى 


View Tier طبعة العرض‎ 


Business Tier dlezll طبعقة‎ 


Data Tier ٽتlنlيıll طبقة‎ 


إن ضربت بتحذيري عرض الحائط فاعلم أنك تخلط الحابل بالنابل 
وتسمح لطبقاتك بتكوين علاقات غير شرعية ستؤدي إلى كوارث في 
تصميمك الثلاثي الطبقات» والتي قد تكون مصيبتها كبر من شوائب 
ئى قد تؤدي إلى تغرات ıinÎة Security Hacks‏ . 


أخيراء الطبقات هذه في تطور مستمر ويمكنك إضافة طبقات أخرى 
متی ما دعت الحاجة ال ذلك»› فمو قعي المتواضع al-asir1.COM‏ 
جديدة لخدمة ويب ءعإ۷إم؟-طاء۷ أو أستخدم مولد تقارير لقاعدة 
البيانات دون الحاجة إلى تعديل ((حرف واحد)) من الطبقات الأخرى 


روء :ا 


الحديث عن التصميم متعدد الطبقات حديث ذو شجون وقد 
آلف فيه مئات الكتب وكتب عنه آلاف المقالات» وكان غرضى الحقيقى 
في هذا المقال تعريفه للمبتدئين فقط ومن هنا سأكتفي بما سطرته من 
الكلام النظري»ونبدا في ورشة عمل صغيرة» وهي عبارة عن مشروع 
بسيط جدا جدا (قد يطوره الاطفال) يهدف إلى تطوير برنامج يتبع 


برنامجنا الصغير فكرته تحتك بشكل مباشر مع ما استفتحت |به هذا 
المقال) الهامبرجر)» حيث يقوم بتسجيل طلبات الزبائن لصاحب مطعمء 
وينقسم إلى ثلاث طبقات: 
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تطویر تطبیق متعدد الطبقات N- 116١‏ 


جل رة اال اال 


طيفة العرص 


تطعقة الدباتات 


طبقة العرض ستكون تط¡¦طبيJق «Windows Application‏ 
وطبقة الأعمال ستكون مجموعة من الفئات وعووه[ا٣)‏ محضونة داخل 
مكتبة 511 وطبقة البيانات ستعتمد على خادمي اlئمفضl Microsoft‏ 

.SQL Server 2005 


في هذا المقال سننجز طبقة البيانات فقط, والطبقات الأخرى في 
المقال/المقالات القادم/ة (قد يكون واحد أو اثنين» على حسب 
المزاج!) . 


ا 


وهي کل ما يتعلق بقاعدة البيانات› وفي مشرو عنا البسبط 
تنقسم إلى قسمين: الأول الجداول ءع1طه٠‏ والقسم الثاني إجراءات 
»Store4 Procedures‏ بالنسبة للجداول فالشكل التالي يختصر كل 
الحكاية ٠‏ 


Orders * 
1? ordi 
ordDUate 


Items * 
(tnmirelzrlî 
YF tmFracduuctld 

ttn urantity 


Products * 
î prdlD 
priN ame 


للموشاركة أو الاستفسار زوروا موقعنا على النت ٠٣0‏ c0ء.vb4arab‏ 


ترك العسيريى 


في التطبيقات الكبيرة والمحترمة (وليس مثل مشروعنا) يتم 
التخطيط أولا (قبل البدء في تصميم قاعدة البيانات) بإتباع مخططات 
وحدlاتٽت‏ lallڻlêٽت Entity Relationship Diagrams (ER-‏ 
(2"5اعه1(؛ والتي ليست سوى رسوم لتصميم عالي المستوى 
High Level Design‏ لقاعدة البيانات. أنصحك بالبحٿث حول هذا 
الموضوع في أي موقع بحث. 


بخصوص إجراءات sءعdurعProc Stored‏ فهناك 4 
اجر اءات خاصة بجدول المنتجات sئ٤ئProduc›‏ الإجراء 
Products. Add New‏ مثلا غرضه تعريف منتج جديد في الجدول: 


کود: 
ALLER PROCEDURE  [PFEOQUCLTS.. AQdONEeW |‏ 


( 


CODED. URICUETLOERELT LEE, 
GprdName nvarchar (50) 


SET NOCOUNT ON 
INSERT INTO Products 


( 


BDECLL; 
prdName 
) 
VALUES 
( 
CoEUID, 
@GprdName 
) 
RETURN 
الإجراء [A1)عs.6ءductدعP" يعود بكافة المنتجات»‎ 
تتعديل سجل» والإجراء‎ "Products. والإجراء ع )اهلم‎ 
واضح غرضه. بالنسبة لجدول الطلبات ءإعل0‎ Products.Delete 
ووحدات الطلبات وصع)] فتكون البداية مع الإجراء‎ 
والذي یبدا بإنشاء سجل جدید في‎ Odهrs.DefineNewOrder‎ 
جدول ل0 لیمثل طلب جدید:‎ 
کود:‎ 


[Orders.DefineNewOrder ] 


ALTER PROCEDURE 
( 
OOEOTD UNLOUETOENETLELEE, 
dordDate smalldatet ime 


GEL NOCOUNT ON 


INSERT INIO-OEIEES 
( 
OEOLD, 
ordDate 
) 
VALUES 
( 
GoOFOLD, 
GordDate 
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تطویر تطببق متعدد الطبقات N- 11٥٣‏ 


eT‏ تركي العسيري 
وفي كل مرة تود إضافة عنصر إلى الطلب» فالإجراءإعءل01٥ ١1‏ ع)آdك۸.١إمdل0‏ تحت الخدمة: 


کود: 
ALTER PROCEDURE [Orders.AddItemToOrder |]‏ 
( 


CLEMOECEFID UhiGuUceidEnETLELET, 
LEME EOQUUCELD UNTIGUELOERETETEE, 
ALEmMOUaANLCLEY. SMa LLIN 


SEL .NOCOUNT ON 
INSERT. INIG LEEMS 


( 
LLMOEUGE ID, 


1LMIEPEFOUUCLID, 
LEMOuUanTI1 EY 

) 

VALUES 


( 
@Gi1tmOrderID, 
GTIEMPEOGCUCEID, 
GitmQuantity 


) 
RETURN 


الإجرlاء‏ ders.RemoveltemFromOrderاO‏ يحذف احد العناصر من الطلب» ويمكنك معرفة جميع العناصر التابعة للطلب من خلال 
الإجرlء .0rders.GetA11]temInOrder‏ أخيراء بالنسبة للإجراء إعمإإ0ع)ع1ع(D.١إعdإ0‏ سيقوم بحذف الطلب وجميع العناصر التابعة له في 
جدول یمع)] : 


کود: 
ALTER PROCEDURE [Orders.DeleteOrder |]‏ 
( 


AOEQALD: UNIOUELOENLCLT Te 


) 
AS 
SET NOCOUNT ON 
DELETE FROM 
Orders 
WHERE 
OoOrdID = @ordID 


DELETE FROM 
Items 
WHERE 
1tmOrderID = @QordID 
RETURN 


قد تتساءل عن سبب قيامي بحذف العناصر في جدول وم ع]] يدوياء فالمتوقع إن يقوم محرك قاعدة البيانات بحذفها تلقائيا بسبب العلاقة» ولكن في 
الحقيقة لا توجد علاقات بين الجداول فلا أحبذ استخدامها كثيرا بسبب أنها تضعف كفاءة التنفيذء وبالنسبة للعلاقات الواضحة بالصورة فهي 
للتوضيح فقط (كما يقول المتل: لا تصدق كل ما تراه). 


تاتھہ 


التطبيقات متعددة الطبقات ءمهناه‌ناممA۸‏ ١ء1 N-1‏ ليست سوى أسلوب لتصميم معماري «عزوەD‏ ۲۵ )ط۲ A‏ يتبعه مصممو 
التطبيقات» الغرض منه تقسيم التطبيق إلى طبقات مستقلة أكثر تنظيما وقابلية للصيانة. في المقال القادم سنكمل ورشة العمل لبناء تطبيق ثلاثي 
الطبفقات»› والى ذلك الحين يمكنك انزال شفرة قاعدة البيانات Database Script‏ (اضغط علی الجملة المسطرة) شاملة للجداول واجراءات 
Stored Procedures‏ التي صممناھا للتو. 
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اخترنا لك مون موكتبہ الكنبا ... 


Unified Modeling Language User Guide 
(Booch, Rumbaugh, Jacobson)نييلصألا المرجع الكامل لتعلم لغة ل1ل من مؤسسي اللغة‎ 


[ HE UNIFIED MODELING 
LANGUAGE USER GUIDE 
Second Edition 


JANMIES RUMBAUGH 
IVAR JACOBSON 


Covers UML 2.0 


Thoroughly updatedl— HUUCH 
The ıirimatfeê Iuforial E coroner 

to the UML from رلاد اال‎ 
the original derigNEers 


اللغة: انجليزية 

Ivar «James Rumbaugh «< Grady Booch :کلؤnll‎ 
Jacobson 

نوع الملف: °1۷ 

حجم الملف: 4.5 ميغا 

الطبعة: 2 

تاريخ النشر: 2005 

Addison Wesley :رتiلl دار‎ 


للوشاركة أو الاستفسار زوروا ووقعنا على النث ١0۳ء.طaإ4aطvb‏ 
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icros 1 Visual Basic .NET 
| 


تطالعون في هذا العدد... 


تستخدم مكتبة ال +601 فئتان أساسیتان Brush g Pen la‏ 
لتحدید مظھر ما تقوم برسمہ. حیث یحدد ا٤٥‏ زط0 ۴۴۸ کیفیۃ رسم الخطوط 


يستخدم مترجم الفيجوال بيسك 2006 الاستدلال على النوع ۴٭مر! 
معenآاع'اn]لتحديد‏ نوع المتغيرات المحلية التي تم التصريح عنها بدون استخدام 
فقرة ك4 في تعبير التصريح حيث يستدل المترجم على نوع المتغير من نوع التعبير... 


يقدم فيجوال بيسك 2008 لطر gollص‏ عة Extension Meth 0dS‏ 
التي تمكن المطور من إضسافۂ وظائف موخصصۂ لذنواع البيانات الوعرفۂ سابقا من دون 
إنشاء نوع جديد مشتق. وما يمكنك من كتابةۃ طريقة يوكن أن تستدعى كما لو 
كانت مون ضصون النوع الموجود... 


اخترنا لك من وكتبة الكثتب 
Mastering Visual Basic. NET‏ 
كتاب الذستاذ تركي العسيرىي 


بعض الذمور الأساسيۂ فى موضوع الرسم فى VB .Net‏ 
محمد سامر ابو سلو 

تستخدم مکتبة ال +651 فئتان اساسیتان هما ہ٤‏ و طوںإع التحدید مظھر ما تقوم برسمه. حیث یحدد )٥زط0‏ ہ٥۴‏ کیفیة رسم 
الخطوط کاللون والسماكة والاستمرارية واأتنقيط فمذلا عندما تستخدم الدالة DrawPolygon‏ لرسم مضلع فأنت تمرر Pen Object lg‏ 


يحدد كيفية رسم خطوط ذلك المضلع في حين يدد Brush Object‏ كيفية ملئ المساحات كاللون وطريقة التهشير والتدرج اللوني فمثلا يمكنك 
استخدام Brush Object‏ أتحديد كيفية ملئ المساحات المغلفقة كما نفعل عند استخدام الدالة F1LllRectangle‏ لرسم مستطیل مملوء 


ويمكن تحديد الخطوات الأساسية لرسم أي شكل بشكل عام 

. Graphics Object sli .1 

2. تحديد )زا0 طوںا8 لملئ المساحات في ذلك الشكل. 

3. تحديد )٥زط0 ۴٠۸‏ لتحديد كيفية رسم خطوط ذلك الشكل. 
اي الا ر ا ا ا رد ره 


فمثلا يمكنك استخدام الحدث عم ج٥‏ للنموذج للرسم عليه عندما يتم إعادة رسم النموذج كما في قطعة الكود التالية حيث يقدم لك إجراء 
الحدث خد د جع الوسيطة وء 1طمهةءىي .ء التي هي ال اءع[طا0 ءءنطمهإ الذي نستخدمه للرسم وعند انتهاء الحدث يقوم فيجول بيسك 
بنقل ما تم رسمه علی ال Graphics Object‏ إلى المنطفة المناسبة علی النموذج ال يجب أن ينم الرسم علیھا .حیث نقوم بانشاء کائن 
Brush‏ 11ء المشتق من الكائن طوںإ الذي سنستخدمه لرسم دائرة مملوءة بتمریره للدالة مم ۳111۳111 ثم نقوم بإنشاء کائن 
Penنقوم‏ بتمریره للدالة DrawEllipse‏ المستخدمة هنا لرسم دائرة تحيط بالدائرة السابفة. 


کود: 
Private Sub Form1_Palnt (ByVal sender As Object, ByVal e As‏ 
System.Windows.Forms.PalintEventArgs) Handles Me.Paint‏ 


Dim sBrush As New Sol1idBrush (Color. YellowGreen) 
E, GEAPDLCSELLLELLLIBSSCSBEUS,. LO. Op. LOU; LOO) 


Dim cPen As New Pen (Color.Blue, 5) 
e.Graphics.DrawEllipse (cPen, 10, 10, 100, 100) 
EN. SUD 


في الغالب تات دوال الرسم بعدة نسح ذات تحمیل زائد Overloaded‏ فمثلا الدالة FILLELLiIpSê‏ تمتلک أربع نسح یمکن 
استخدام اي منها للرسم حسب الحاجة. 
کود: 


Graphics.FI1llEllipse (Brush, Rectangle) 
Graphics.FillELlipse (Brush, RectanglLerF') 
GEADIELOS.EFLLLELLIDGSELEEUShy,. INCI; INL IOLA; LNCS) 
Graphics.FI1LLEllipse (Brush, Single, Single, Single, Single) 


حيث يمكننا إعادة كتابة قطعة الكود السابقة باستخدام كائن ماإعمه)ء 8R‏ بالشكل: 
کود: 


Dim sBrush As New Sol1idBrush (Color. YellowGreen) 
Dim rec As New Rectangle (10, 10, 100, 100) 


E CTFAPNICSSELLLELLIBSESE(SBEUShN, FEC) 


Dim cPen As New Pen (Color.Blue, 5) 
e.Graphics.DrawEllipse (cPen, rec) 


وتأتي جميع عمليات الرسم في مكتبة ال +61 ضمن هذه الخطوات الأساسية للرسم ولكن كائنات Pen‏ و Brus‏ یمکن أن تات 
E E RE CE O‏ 
ا اننا ضمن اك 65 أوامر تمكنك من رسم انناء مثيرة كالدالة DrawBez ier‏ التي تستخدم لرسم المنحنيات. 


بعض الذمور الأساسيۂ فى موضوع الرسم فى VB .Net‏ 

محمد سامر أبو سلو 
يمكنك استخدام مجال الاساء SYS LEM. DCAWING. LExXT‏ لرسم الخطوط بحيث يحتوي علی ثلاث فئات أساسية 

PECIVOLEPFONLUOLLECLILIOH SS INST ALLSOP OR ECOLLECELORN SPORE COLLESLEILOS 

فللحصول على قائمة بالخطوط المركبة على الجهاز نستخدم الفةَ ر10غءء°011 ”ت٣‏ dءnsta11ا‏ التي نستخدم دالتها 

في المثال 

کود: 

Dim iFonts As New Drawing.Text.InstalledFontCollection 
Dim iFamilies() As FontFamily = 1Fonts.Families () 

For Each fFamily As FontFamilily In iFamilles 
lIstFonts.lItems.Add(fFamily.Name) 


Next fFamily 
LSLFONTS.SEelectéedIndéêx = Û 


كما يحتوي مجJ‏ JlٺÎسlaءs (enumeration) slدعتll Je System. Drawing. Ioext‏ xtRenderingHintء‏ الذي یحدد 
aE E O a‏ 
کود: 


Private Sub Form1_Paint (ByVal sender As Object, 
ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint 


Dim the_font As New Font (Me.Font.FontFamily, 40, FontStyle.Bold, 
GraphicsUnit.Pixel) 

ادو اة اال" 

e.Graphics.TextRenderingHint = 
System.Drawing. Text. TextRenderingHint.AntlAllasGridF'i1t 

é.G6GEABDRICS. DEFAWSLELNG (TALTaAS", The font; BlEUSNES:BLaCky,. S5; ©) 


اام عاصة اا افليس 
e.Graphics. TextRenderingHint =‏ 
System.Drawing. Text. TextRenderingHint.SIingleBitPerPixel‏ 
GEADRLICS.DEAWSLEILING( TALLEST,‏ ,€ 
LIS. TONLy, BEUSNES.ELaACKE, Oy. S0)‏ 
ERC. Sub‏ 


تستخدم ائدllذة DrawBezier‏ لرسم منحنیات محددة بأربع نقاط تحکم بحیت يبدا المنحنى عند النقطة الاو وينتهي عند الأخيرة 
بحيث يحدد الخط الواصل بين النقطة الأولى والثانية اتجاه المنحنى بينما يحدد الخط بين النقطتين الثالثة والرابعة الاتجاه النهائي للمنحنى. 


تمثل قطعة الكود التالية مثالا على استخدام الدالة Draw Bezier‏ حيث يبدأ الكود بتعريف مصفوفة نقاط من النوع ¬٤‏ ذه٥‏ تضم النقاط التي 
نرید استخدامها لرسم المنحنى ثم ننشئ قلم مخطط بلون آسود نستخدمه من خلال اÙلدllذi‏ eمDrawlLin‏ لرسم خط يصل بين تلك النقاط ثم ننشئ 
قلم بلون ازرق نمررہ للدالة ٣ء‏ 1 8٥z‏ سے۲ لرسم المنحنى 

کود: 


NAN gS GG CAC BE Aa, 
ULM GLC). AS POINL = f 
New Point (10, 10), 
New Point (200, 10), 
New Point (50, 200), 
New Point (200, 150) } 
عملية توصيل النقاط بخط متقطع'‎ 
Dim dashed_pen As New Pen (Color.Black, 0) 
dashed_pen.DashStyle = Drawing2D.DashStyle.Dash 
For 1 As Integer = 0 To 2 
e.Graphics.DrawLine (dashed_pen, pts(l1), pts(l + 1)) 
Next 1 
عملية رسم المنحنى'‎ 
e.Graphics.SmoothingMode = Drawing2D.SmoothingMode.HighQuality 
Dim bez_pen As New Pen (Color.Blue, 3) 
e.Graphics.DrawBezler (bez_pen, pts(0), pts(l), pts(2), pts (3)) 


مجلةۃ سهرية مجانيةۃ تصدر عن موقع فيجوال بيسك للعرب 


بعض الذمور الأساسية فى موضصوع الرسم في V8 .Net‏ 

محمد سامر أبو سلو 
كما تستخدم الدالة إ٠‏ 1 8٠2‏ سه٠(‏ لرسم سلسلة من الخطوط المنحنية التي تمتلك نقاط نهاية عامة وهي تأخذ كوسيطة لها مصفوفة 

من النقاط تحدد الأشكال المنحنية التي سيتم رسمها بحيث تمل النقاط الأربعة الأولى المنحنى الأول ويستخدم المنحني الثاني نقطتي نهاية المنحنى 

الأول كنقاط بداية له ويتكرر هذا على مستوى جميع النقاط الموجودة داخل المصفوفة ولإنشاء عدد N‏ من المنحنيات نستخدم المعادلة: 

N +3‏ * 1 لحساب عدد النقاط اللازمة لرسم تلك المنحنيات وتمثل قطعة الكود التالية مثالا على استخدام الدالة إ٥‏ 8ez1سawاD‏ 

کود: 


IEEE EES‏ ا ٍ لخي لاا 
Dim pis() As Point = { _‏ 
New Point (10, 10),‏ 
O‏ 
OU‏ 


New Point ( 
New Point (5 
New e LOVE 
New Point (250, 50), _ 
( 
( 


New Point (250, 200), 
New Point (100, 250) } 


قملعةه. رزسشة التحي' 
GEFAPRILCS SMmOOEhInGMoOode =. DEAWLNGZD: SMOOCHLNGMOAdE. RHLGROUALILTY‏ .€ 
Dim bez_pen As New Pen (Color.BlueViolet, 3)‏ 
e.Graphics.DrawBezilers (bez_pen, pts)‏ 
تستخدم الدالة e‏ 7إ 4٣u‏ ء105٣٤س«هإ ‏ لرسم منحنى مغلق وذلك بطريقة مشابهة لاستخدام الدالة إ ع 1 ٥z‏ 8 سإ كما في قطعة 
الكود التاأبة٠‏ 


کود: 


اتعريك تقاط التحجكح ع متجى الدالة' 
Dim pts() As Point = { _‏ 

NEN POINT (LO, SO); 
New e 30) ¢ 
New Point (2 2UUN; 
New LON ys o 
New Point (250, 50), 
New Point (250, 200), 
New Point (100, 250) } 
MET عملية رسم اى‎ 
e.Graphics.SmoothingMode = Drawing2D.SmoothingMode.HighQuality 
Dim curve_pen As New Pen (Color.Black, 3) 
e.Graphics.DrawClosedCurve (curve pen, Pts) 


تستخدم الدالة ط غج ع سوإد لرسم كائن ااج ۲ءء 1 اماي حيث بعد إنشاء كائن اة ٥ءء‏ 1طمهإى فارع نستخدم الدالة 
اللص كما في قطعة الكود التالية التي تستخدم الدالة إخج ۳111٥‏ لملئ منطفة محددة بكائن ٥a1‏ وء 1طمهءىي ثم نستخدم الدالة 
a1‏ ساط لرسم الحدود الخارجية لمسار الرسم: 
کود: 
پء کان او 
Dim graphics_path As New Drawing2D.GraphicsPath‏ 
أقاف ص اف العانن قارع" 
GEaDBICS BALCH. AIOSEEING (TCEADDHICSP ALENT”;‏ 
New FontFamily ("Times New Roman"),‏ 
CINT (EFORNESEYVLE.BOLA),‏ 
SU; New POINTE (LO, LO,‏ 
StringFormat.GenerlicTypographic)‏ 
Draw the path.‏ ' 
.Graphics.SmoothingMode = Drawing2D.SmoothingMode.AntiAllas‏ 
GEAphICS.FILIPaLh (BEUSshEeS. Yellow, Graphics. palth)‏ . 
.Graphics.DrawPath (New Pen (Color.Blue, 3), graphics path)‏ 


ا کا مک ادا ا وو ا س مار مرت من عد اکل م کا مط کا ق ف اک او آي 
ا تستخدم الدوال ءsءم111p٤Add‏ و AddRectang1e‏ و Addie‏ لإضافة الأشكال التي نريدها ل 


LAD RLCESPAEN vbêarab.com‏ ثم نقوم بعملية الرسم 
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60. 


بعض الذمور الأساسية فى موضصوع الرسم في V8 .Net‏ 


کود: 


Dim graphics_path As New Drawing2D.GraphicsPath 


GEApNLCS BDALR.AUOELLIBDSELU;, LO; SO; 19) 
qraphics_path.AddRectangle (New Rectangle (50, 50, 100, 80)) 
GEADHLCS BALCH. AOOPIE (LUV, OU, L2U, 2U; AS; 21L0) 


e.Graphics.SmoothingMode = Drawing2D.SmoothingMode.AntiAlias 
E. GEADRLCSLEFLLLPALCN(BEUShEeS. YeEllow;y, GFEaphNICS. path) 
e.Graphics.DrawPath (New Pen (Color.Blue, 3), graphics_path) 


وبهذا نكون قد غطينا فكرة مبدئية عن كيفية استخدام أدوات الرسم في فيجول بيسك . نت بحيث يمكنك الاستعانة بها لرسم أي شيء يمر 
بمخيلتك ولن تجد صعوبة في الاستعانة بمكتبة N155١‏ لاستعراض فئات وكائنات ودوال الرسم الموجودة ومن ثم استخدامها في برنامجك لرسم 
ما ترید. 


اخترنا لك من وكتبہ الكتبا ... 


Mastering Visual Basic. NET 
فقد حان الوقت لمعرفة هذه السلسلة العلمية الرائعة.‎ Mastering لمن لا يعرف السلسلة الشهيرة‎ 
الكتاب الذي ترونه بين أيدكم واحد من أشهر الكتب التي تستعمل كمرجع في تعليم لغة الفيبي نت.‎ 
صورة الغلاف: المحثوبات‎ 

Introduction 
| The Fundamentals 
Chapter 1 ° Getting Started with VB.NET 
Chapter 2 ° Visual Basic Projects 
Chapter 3 ° Visual Basic: The Language 
Chapter 4 ° Writing and Using Procedures 
Chapter 5 ° Working with Forms - 
Chapter 6 ° Basic Windows Controls M astering 
Chapter 7 ° More Windows Controls 
. Part Il‘ Rolling Your Own Objects Evangelos Petroutsos 
٠ ) Chapter 8 ° Building Custom Classes 
Chapter 9 ° Building Custom Windows Controls 
Chapter 10 ° Automating Microsoft Office Applications 
Part Ill» Basic Framework Classes 
Chapter 11 ° Storing Data in Collections 
Chapter 12۰° Handling Strings, Characters, and Dates 
Chapter 13 ° Working with Folders and Files 


mE Sa Famren Lanza 


e j‏ ت قف عا غ 58 چک چ 


Part IV ° Intermediate Programming 

Chapter 14۰ Drawing and Painting with Visual Basic ل انجليزيه‎ 
Chapter 15 ° Printing with VB.NET Petroutsos Evangelos:فlؤnئl‎ 
Chapter 16 ° The TreeView and ListView Controls P9۴ نوع الملف:‎ 
Chapter 17 ° Error Handling and Debugging حجم الملف: 14.8 ميغا‎ 


Chapter 18 ° Recursive Programming 1 الطبعة:‎ 
Chapter 19° The Multiple Document Interface 1100 عدد الصفحات:‎ 


Part V ° Database Programming with VB.NET 2002 تاريخ النشر:‎ 
Chapter 20 ° Databases: Architecture and Basic Concepts Syط‌م× دار النشر:‎ 


Chapter 21 ° Building Database Applications with ADO.NET 
Chapter 22 ۰ Programming the ADO.NET Objects ذز بل الكتاب اضخط ها‎ 
Part Vl» VB.NET on the Web 


Chapter 23 ° Introduction to Web Programming ۶ 7 ض‎ 


Chapter 24 ° Accessing Data on the Web 
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جديد الفيبي 2008/ الاستدلال المحلى على النوع 


محمد سامر أبو سلو 
یستخدم مترجم الفيجوال بيسك 2008 الاستدلال غل النوع Type Inference‏ لأتحديد نوع المتغيرات المحلية اتی تم التصريح عنها 
بدون استخدام فقرة ء4 في تعبير التصريح حيث يستدل المترجم على نوع المتغير من نوع التعبير الذي يضبط قيمة ذلك المتغير مما يوفر إمكانية 
تعريف المغيرات بدون تحديد نوعها كما في المثال التالي: 
کود: 
Public Sub inferenceExample ()‏ 
USAT ORDLLELE CODING:‏ `" 
Dim numl As Integer = 3‏ 


' Using local type inference. 
DIR HUM = 3 
ENC Sub 


ولا يمكن استخدام الاستدلال المحلي على النوع عند تعريف الحقول في الفئة ول1ع۴ ووه1٤‏ فإن كان 2نم في المتثال السابق حقلا في 
فئة بدلا عن کونه متغیرا محلیا فسوف يولد التصریح خطاً إذا کان ہو0 غStr1c Option‏ وسوف یصنف 2ں على أنه کائن 
Object‏ إن کان £ 0£ pt 10n Strict‏ وبشكل مشابه فنوع المتغيرات الساكنة وع [طهذ٣ه‏ ۷ ء1اه)S‏ لا يمكن الاستدلال عليها إن كان 
Option Strict On‏ وإن کان pt ion Strict 0F£‏ فنوع المتغیر الساکن سیکون کائن )٥ء‏ [ط0 فإن لم تكن ترید من 
المتغير 2م في المثال السابق أن يكون من النوع إءع وه 1.٤‏ فيمكنك تحديد نوعا آخر عند التصريح عنه 
کود: 
Dim num3 As Object = 3‏ 
Dim num4 As Double = 3‏ 


والكود الذي یستخدم استد لال النوع يشابه الكود الذي يعتمد کل الربط المتأخر Late Binding‏ الذي سیکون نو عه معروفا فقط في زمن 
ا ول ع اک د می ا ی د 0 لاف رخ لار هرابر صاع اس ار ا 
الى تمکین بيئة التطوير من تزويد المبرمج 4 Intell1Sense‏ والمساعدة حول أعضاء ذألك الغرضص بالإضافة الى تفضيله لاعتبارات خاصة 
بالأداء بسبب أن جميع البيانات التي تخزن باستخدام الربط المتأخر يجب تغليفها وكأنها من النوع ٤ء٠‏ زط٥‏ والوصول إلى الأعضاء في زمن 
التشغيل سيكون أبطا. 

يحدث الاستدلال على النوع عندما يتم التصريح عن المتغير يدون استخدام فقرة 5 في تعبير التصريح وضبط قيمة لذلك المتغير 
فيستخدم المترجم نوع تلك القيمة كنوع للمتغير فمثلا سطور الكود التالية تعرف متغيرا من النوع و٣‏ ذإخS‏ 


کود: 


` USING EIB LIGIEE CODING 

Dim naméel A8 SLTEING = TSDEINGEIEILO™ 
' Using local type inference. 

Dim name#2 = "Springfield" 


1١خهوهإ ويستعرض الكود التالي طريقتان متكافئتان لإنشاء مصفوفة من النرع‎ 
کود:‎ 
` USING SIDLICGIT CDT: 
Dim someNumbersl () As Integer = New Integer() {4, 
' Using local type inference. 
Dim someNumbers2 = New Integer() {4, 18, 11, 9, 8, 


GEE O O IC E E 
عبارة عن مصفوفة و‌ غ11‎ someNumbers2 لن‎ 1!nteger 
کود:‎ 


DIM tEOLEAL = Û 
For Each number In someNumbers2 


total += number 
Next 


ویستخدم الاستدلال على النوع في العبارة ود ¡ ون أيضا لتحديد نوع اسم المصدر كما هو واضح في المثال الال 
کود: 
Using proc = New System.Diagnostlics.Process‏ 


'" TnSert Code to work WILh thé FéSsSouüUrCe: 
Endy Using 


جديد الفيبى 2008/ الاستدلال الوحلى على النوع 
محمد سامر أبو سلو 
ویستدل 2 نوع المتغير من القيمة المعادة من الإجراء اشا كما هو ظاهر في الكود اتال حيث يکون PpList1‏ و PpLIst2‏ عبارة عن s)ء1ا‏ 
of Processes‏ 
کود: 

'  UEING ERDILCLE EVSINT. 
Dim pL1ist1() As Process = Process.GetProcesses () 


' Using local type inference. 
Dim pList2 = Process.GetProcesses () 


وقد قدم فيجول بيسك 2008 خيارا جديدا هو إه۴ 1٥۸ 1٣‏ اص0 يمكنك من تحديد إذا كان الاستدلال المحلي على النوع مسموحا أم لا في 
ملف معن فقمكن آر تمل خر الات لال على اوغ (كت القعير الشات من السطرين الین فى فا اماف 
کود: 

ODLIORN Iie OIL 
ام في الكود فالمترجم سيستخدم الخيار الافتراضي 01 إ٥1,۴ ١t10مه0 من أجل‎ ٥١ 1, وإن لم تقم بتحديد قيمة للخيار إ+ء‎ 
إء۴ ¬1 د10 ام0 من أجل المشاريع التي تمت ترقيتها من إصدارات‎ 0Ê المشاريع التي تم إنشاؤها في 2008 1ى8 ua1ء۷1 والخيار‎ 
سابقة. وإن تضاربت قيمة الخيار ءآ «٥:)م0 في الملف مع القيمة المضبوطة في خيارات بيئة التطوير أو في سطر الأوامر فسوف يتم‎ 
اال الا ارد في الف‎ 
ويستخدم الاستدلال على النوع فقط في المتغيرات غير الساكنة عناه)؟-«N0 ولا يمكن استخدامها في تعريف حقول الفنة ول1ع ۴ ويها أو‎ 
Functions ٽاءlرجإلا الخصائص وع1٤إم ص۴0 أو‎ 


وعلووۂ : الكلمۂ المحجوزة ودذئU‏ 


الكلمة المحجوزة Using‏ تستخدم لتعريف المتغيرات ولكنها تمتاز بأنها تقوم يعمل تحریر للمسار أي Dispose‏ تلقائيا يدون تدخل مناك 
القاض من لاحات المررة في ا اة من د ت ا د را ١‏ اوا ر ال ف ات هة وھا کا کے سرع ار 
وتطبيقا لمبداً تحسين الأداء .(Optimization JI)‏ 


کود: 


Using resource As New resourceType 
' Insert code to work with resource. 
EQ USING 


"` TBE FOLLOWING TEY CONSIRUCTION IC EOUIVALENT. TO. TEE USING BLOCK 
Dim resource As New resourceType 
LLY 
' Insert code to work with resource. 
Catch é6xXx As Exception 
' Insert code to process exception. 
FIRE LIL 
' Insert code to do additional processing before disposing of resource. 
resource.Dispose () 
Enid TEY 
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جديد الفيبى 8/الطرق الووسعة Extension Methods‏ 


محمد سامر أبو سلو 

يقدم فيجول بيسك 2008 الطرق الموَسعة sل0طاM‏ ١10ورم)×8‏ التي تمكن المطور من إضافة وظائف مخصصة لأنواع البيانات 
المعرفة سابقا من دون إنشاء نوع جديد مشتق. مما يمكنك من كتابة طريقة يمكن أن تستدعى كما لو كانت من ضمن النوع الموجود. والطريقة 
الموسعة يمكن أن تكون إجراء طں؟ أو وظیفة ٣ہ‏ ٤ہن۴‏ ولا يمكن أن تكرن خاصية ر ٤إ‏ همهم أو حقل ل[ع۴ أو حدث Event‏ 
وجميع الطرق الموسعة يجب تعليمها بالصفة CERES) S‏ من مجال الأسماء 

stem . Runt ime . Comp 1erServ ices‏ Syوتحدد‏ الوسيطة الأولى في الطرق الموسعة نوع البيانات المراد الذي سيطلق 

الطريقة 

في المتال التالي يتم تحديد الطريقة اد ذ٣ع‏ لتوسيع نوع البيانات و ,1ءء والتي تستخدم "11ء cons0o1e.Nr1t‏ لإظهار 
النص حيث يؤسس الوسيط ود ٣1‏ خ5 ج أن الطريقة ٤ہ‏ ذ٣ع‏ توسع الفنُة و S٣1‏ 
کود: 

Imports System. Runtime.CompllerServices 


Module StringExtensions 
<Extenslon()> _ 


PFUDLILD SUS PENCE VAL SSLCEING AE SLT) 
Console.WriteLlLine (aString) 
ENG Sub 


End Module 
ناله" الحاوية للطريقة اختياري ولكن كل‎ 1٠ لاحظ أن تعريف الطريقة الموسعة محدد بالصفة < () ١ه ذوصها×۳> ويكون تعليم ال‎ 
طريقة موسعة يجب أن يتم تعليمها بالصفة المذكورة كما يجب استیراد مجال ا اء‎ 
حتى نتمكن من الوصول إلى تلك الصفة. ولا يمكن تعريف الطرق الموسعة إلا‎ System. Runtime . Comp L1erServices 
سنحتاج لاستخدامها فيه فبعد ال 1 الها التي تحتوي على الطريقة ٤د ذ٣ يمكن استدعاء الطريقة عندما يكون هناك طريقة لا تأخذ وسائط‎ 
ToUpper Jin 
کود:‎ 
IMDDETS CONSOLEAPPLILCALCLON2. STCELINGExXTeENnslons 
Module Modulel 
Sub Main () 
Dim example As String = "Hello" 
' Call to extension method Print. 
example.Print () 


' Call to instance method ToUpper. 
example. ToUpper () 
example. ToUpper.Print () 
ENG Sub 
End Module 


وفي المثال التالي تكرن ٥ء‏ امuں†ء ٥u,‏ ك,رهاد :اط طريقة موسعة أخرى للنوع ود ذءإاك وفي هذه المرة تمتلك وسيطتين الأولى 
وا tكمتحدد‏ أن الطريقة توسع النوع ود S1‏ وتكون الوسيطة الثانية دنم عبارة عن سلسلة من علامات الترقيم التي ستمرر عند 
استدعاء الطريقة التي تظهر نصا متبوعا بعلامات الترقيم 
کود: 
Imports ConsoleApplicatlion2.StringExtensilons‏ 
Module Modulel‏ 
Sub Main ()‏ 
Dim example As String = "Hello"‏ 


' Call to éxtéensîion méthod PrFInNL. 
example.Print () 


' Call to instance method ToUpper. 
example. ToUpper () 
example. ToUpper.Print () 
End Sub 
End Module 


حيث يتم استدعاء الطريقة بتمرير وسيطة نصية آ— uncطp‏ مثں)"."(example.PrintAndPunctuate‏ 


ظا ويظهر المتال التالي تحديد واستدعاء Print‏ و PrintAndPunctuate‏ واستیراد 


Runt ime. €compi1erServ ices‏ . ystemكالذي‏ يمكن من الوصول إلى الصفة التي تحدد الطرق 
ا 
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جديد الفيبي 08 2/الطرق الموسعة Extension Methods‏ 


کود: 
Imports System.Runtime.CompilerServices‏ 
Module StringExtensions‏ 
<Extenslion()> _‏ 
FUOLICG SUD FIINLCIET GL ASTCEING AS SLING)‏ 
Console.WriteLlLine (aString)‏ 
ENQ Sub‏ 
<Extenslon()> _‏ 
PUDLICG SUS FFIRNEANGOPUNCEUAEE (BYVAL. ASEEING-AS SEFING, BVVEL pulnc . AS SEEING)‏ 
Console.WritelLine (aString & punc)‏ 
ENO Sub‏ 
End Module‏ 


کود: 
IMOOETES CONSOLEAPPLTCACIONA .SLCEILRNGEXTENSIONS‏ 
Module Modulel‏ 
Sub Main ()‏ 
Dim example As String = "Example string"‏ 
example.Print ()‏ 
example = "Hello"‏ 
example.PrintAndPunctuate (".")‏ 
example.PrintAndPunctuate ("!!!!")‏ 
ENC SUS‏ 
End Module‏ 


كل ما يتطلبه تشغيل طرق موسعة كهذه هي أن تكون ضمن مجال رؤية الكود فإن كانت u 1٠‏ ١ه"‏ ضمن المجال فستكون الطريقة مرئية من 
قبل عء” ٥111ع[‏ ويمكن استدعاؤها كما لو كانت من ضمن الطرق الاعتيادية . 

لاحظ انه عندما يتم استدعاء الطرق الموسعة لا يتم تمرير قيم للوسيطة الأولى فالوسيطة ود ذإ ٤5ج‏ في الطريقة السابقة تحدد أنها يجب أن 
تستدعى من النوع و١‏ 1اك والمترجم سيستخدم المتغير النصي كقيمة لتلك الوسيطة ويمكن تحديد طرق موسعة على معظم الأنواع التي 
يمكن استخدامها في فيجول بيسك ضمن قائمة الوسائط متضمنا التالي: 


(Reference Typesةيzجرnئl الفئات sعوي1aح (الأنواع‎ - 
Structures تراك‎  - 

Interfaces ٽژڼqجlوgll‎ - 

- الإجراءات المفوضةءع)هعع[إء5 

ByVal s ByRef ط٥¦¡ئln,‎ - 

Generic gاوiٺJl‎ biln, - 

المصفوفات ورھA]۲‏ 


- توفر الطرق الموسعة طريقة مريحة وقوية لتوسيع نوع موجود ومع ذلك كي يمكن استخدامهم بنجاح هناك بعض النقاط التي يجب أخذها بعين 
الاعتبار وهي تنطبق بشكل رئيس على مطوري مكتبات الفئات ءعiإهإط1‏ ويها ولكنها يمكن أن تؤثر على أي تطبيق يستخدم الطرق 
الموسعة .وبشكل عام فالطرق الموسعة التي تضيفها للأنواع التي لا تملكها تكون أضعف من تلك التي تملك التحكم عليها لوجود عدد من الأشياء 
التي قد تحدث عندما تضاف طرق موسعة للأنواع التي لا تملكها فيمكن أن تتداخل تلك الطرق مع عمل طريقتك الموسعة. 

- عند وجود عنصر عضو في الفئة يملك توقيعا متوافقا مع وسائط التعبير المستدعي بدون حدوث تحويل تضييقَ narrOoWi1g C0۸VêrSi01‏ 
مظرت من الوسائط فاح لك الجر :افخ عل طرقك الوس لك من عد ةة نت الخ اض لل ان ل دران 
لاصولا ا ا 

- لا يمكن أن يمنع كاتب الطريقة الموسعة المبرمجين الأخرين من كتابة طرق موسعة تتعارض مع طريقته. 

- يمكنك تحسين قوة إجراءاتك الموسعة بوضعها ضمن مجال أسماء NameSpace‏ خاص بهم لتمكين مستخدمي مكتبتك من استیراد او 
استبعاد كامل مجال الأسماء أو اختيار المناسب من مجالات أسماء المكتبة. 

کون توسیع الواجھات sعcھ۴إrعnt]‏ امن من توسیع الفئات وعووه[) وخاصة إذا كنت لا تملك تلك الواجهة أو الفئة فكل تغيير في واجهة 
سيؤثر على جميع الفئات التي تعتمد عليها لذلك فالمبرمج قليلا ما يغير في الطرق الموجودة في الواجهة. 


١ 
N 


TT 


جديد الفيبي 28/الطرق الموسعة Extension Methods‏ 


محمد سامر أبو سلو 
6 0 و منه أنواع أخرى تكون هناك طبقات من الاحتمالات من الطرق العادية والموسعة 
التي قد تتداخل مع طريفتك. 


عندما يتطابق توقيع طريقة عادية لمطاءN×‏ ءعcمهstم]‏ مع طريقة موسعة Extension Method‏ في نفس المجال لا يمكن الوصول 
للطريقة الموسعة بالنتيجة. لهذا لا يمكن أن نقوم باستخدام طريقة موسعة لاستبدال طريقة عادية ومع ذلك يمكن للطرق الموسعة امتلاك نفس 
الاسم مع الطرق العادية ولكن مع توقيع مختلف فتكون كلتا الطريقتان متوفرتان طالما أن التوقيع مختلف فمثلا إن كانت الفئة ExampleClass‏ 
کود: 
Imports ConsoleAppllcaltlon2.ExlensionExamp Lé‏ 
Module Modulel‏ 
Sub Main ()‏ 
Dim ex As New ExampleClass‏ 
The following statement calls the extension method.‏ ' 
ex.exampleMethod ("Extension method")‏ 
The following statement calls the instance method.‏ ' 
ex.exampleMethod ()‏ 
ENC. SUD‏ 


Class ExampleClass 
' Define an instance method named exampleMethod. 
Public Sub exampleMethod () 


Console.WriteLlLine ("Instance method") 
ENO Sub 
End Class 
End Module 


Imports System. Runtime.ComplilerServices 
' Define an extension method named exampleMethod. 
Module ExtenslionExample 
<Extenslion()> _ 
Sub exampleMethod (ByVal ec As ExampleClass, _ 
ByVal stringParameter As String) 
Console.WriteLlLine (stringParameter) 
End Sub 
End Module 


والخرج الناتج عن الكود السابق يكون كما يلي 
Extens1ion method‏ 
Instance method‏ 
عندما يكون لطريقتين موسعتين توقيعان مطابقان في نفس مجال الوصول يتم استدعاء الطريقة التي تملك الأسبقية العليا حيث يتم تحديد هذه 
الأسبقية عبر طريقة إدخال هذه الطريقة ضمن المجال وتمثل القائمة التالية تسلسل الأسبقية الى" 
1. الطرق الموسعة الموجودة سابقا ضمن نفس العاإduهM‏ 
2. الطرق الموسعة المعرفة ضمن أنواع البيانات في مجال الأسماء الحالي أو أحد آبائه حيث تملك مجالات الأسماء الأبناء أسبقية على 
أالاياء. 
3. الطرق الموسعة المعرفة ضمن أي نوع تم استيراده للملف الحالي. 
4 الطرق الموسعة الموجودة ضمن أي مجال اتنضاء مستورد ضمن الملف الحالي. 
5. الطرق الموسعة المعرفة ضمن أي نوع مستورد على مستوى المشروع | 
الطرق الموسعة المعرفة ضمن أي مجال أسماء مستورد على مستوى المشروع فإن لم تحل تلك الأسبقية المشكلة يمكنك عندها استخدام 
الاسم الكامل للطريفة الموسعة لتحديد الطريقة التي تقوم باستدعائها فإن كانت الطريقة ۴1,٤‏ في المثال السابق محددة ضمن ال عإModu‏ 
المسماة sءم10یExtenعStrin‏ يكون الاسم الكامل للطريفقة الموسعة StringExtensions.Print(example) g4‏ بدلا عن 
example.Print().‏ 


SHAS. eam 


مجلۃ سمرية مجانيۃ تصدر عن موقع قيجوال بيسك للعرب 


Application Events أحداث التطبيق‎ 


محمد سامر أبو سلو 
من مستكشف المحاليل eإ1oم× ٤‏ «oنutاهS‏ انقر زر الفأرة الأيمن على مشروعك تم اختر وعنااممهإ۴ ثم من صفحة 

Application‏ اضغط زر ۷1ew Appاicati0n 8v en†s‏ فيتم نقلك لمحرر الكود حيث تتمكن من استخدام الحدث الذي تحتاج لمعالجته في 

وفيما يلي تعريف بكل حدث على حدة 

My.Application. Startup Event 


ينطلق هذا الحدث عند بداية التطبيق لتضع فيه الأوامر التي تريد تنفيذها عند بداية التطبيق فمتلا إذا أردت تغيير الثقافة الخاصة 
بالتطبيق إلى العربية - سورية نستخدم كودا شبيها بالتالي: 
کود: 
Private Sub MyApplicatlion_Startup (ByVal sender As Object,‏ 


ByVal e As Microsoft.VisualBasic.ApplicatlonServices.StartupEventArgs) 
Handles Me.Startup 


عير الال اة الحخاهة بلاطي عاك اة الامج ' 
قبل إظهار اية تاقدة ' 
My.Application.ChangeCulture ("Ar-Sy")‏ 

EH . Sab 


و البارامتر م يشير إلى الفة sوع‏ ۸۲24ء ۷٣م u‏ اع مSt‏ التي توفر معلومات حول بداية التطبيق ولها عدة خصائص متل 1عءمه٤‏ التي 
تقوم بإلغاء الحدث و عصال”صةصصهع التي تمرر بارامترات سطر الأوامر للتطبيق وأرعءصuعإه‏ ع 1ا-لروصصهء كما يمكنك الحصول 
على بارامترات سطر الأوامر أيضا باستخدام الأمر ءي إAءn‏ 1 ا1 My . App 1 ication . command‏ من أي مكان في التطبيق. 


My.Application.Shutdown Event 


حيث ينطلق هذا ١‏ الحدث عند نهاية التطبيق فيمكنك استخدامه لمعالجة الأمور التي تحتاجها قبل نهاية التطبيق مباشرة. 


Private Sub MyApplicatlon_Shutdown (ByVal sender As Object, 
ByVal e As System.EventArgs) Handles Me.Shutdown 
MV. ADBLLCALCLON.LOG.WEILEENTEYV (TASBDLILCALCION SHUE DOWD.) 
ENC SUD 


My.Application.StartupNextl nstance Event 


حيث ينطلق هذا ١‏ الحدث عندما تحاول تشغيل نسخة ثانية من التطبيق المفترض أن يكون وحيد llتواجد single-instance application‏ 
والتطبيق مفتوح فعليا . 

مثال: 

کود: 


Private Sub MyApplication_StartupNextInstance (ByVal sender As Object, ByVal e As _ 
Microsoft.VisualBasic.ApplicatlonServices.StartupNextInstanceEventArgs)_ 
Handles Me.StartupNextlInstance 
Dim inputArgument As String = "/input=" 
Dim AnputNanée: AS. SLCFING = WT 
For Each s As String In e.CommandLine 
lf s.ToLlLower.StartsWith (inputArgument) Then 
1inputName = s.Remove (0, 1inputArgument.Length) 
ENC. LE 
NEXT 
If inputName = "" Then 
MsgBox ("No 1input name") 
Else 
MsgBox ("Input name: " & i1inputName) 
EN LF 
End Sub 


vbêarab.conr 


مجلةۃ سهرية مجانيةۃ تصدر عن موقع فيجوال بيسك للعرب 


—-— 


Application Events أحداث التطبيق‎ 


محمد سامر أبو سلو 
حيث يشير البارامتر e‏ للفة و وء ۸٤A‏ ءy٤StartupNext1nstance‏ التي تعيد معلومات حول نسخ التطبیق مہApplicati0‏ 
st‏ حيث تحدد الخاصية كنات إوءإه ٣ه‏ اود ا8 فيما إذا كان يجب نقل التواجد الأول للتطبيق إلى الواجهة و الخاصية 
Ne‏ ا mmanدc‏ تحدد بارامترات سطر الأوامر للتواجد الجديد للتطبيق. 


My.Application. UnhandledException Event 


حيث ينطلق هذا الحدث عندما ينطلقى استثناء «10ام‌ع۴×c‏ في تطبيقك لم تتم معالجته داخل التطبيق لتتمكن من إجراء معالجة لهذا الاستثناء. 
مثال: 
کود: 

Private Sub MyApplicatlon_UnhandledExceptlion (ByVal sender As Object, 


ByVal e As Microsoft.VisualBasic.ApplicationServices.UnhandledExceptionEventArgs) 
Handles Me.UnhandledException 


My.Application.Log.WriteException (e.Exception, 
TraceEventType.Critical, "Unhandled Exception."™) 
End SUüb 


و البارامتر ء يشير إلى الفةَ sواAr‏ 11ء Exception ۴v‏ edاUnhand1‏ التي تحوي معلومات حول الخطأً مثل الخاصية 
xcept in‏ التي تحوي معلومات عن الخطاً و الخاصية ر10 ة1 1ممA‏ 1× التي تحدد فيما إذا كان يجب إنهاء التطبيق فور 
نهاية الإجرائية. 


NetworkChange. NetworkAvailabilityChanged Event 

ينطلق هذا الحدث عندما تحدث تغييرات حول توافر الشبكة 
کود: 
Private Sub MyApplicatlion_UnhandledException (ByVal sender As Object,‏ 


ByVal e As Microsoft.VisualBasic.Appl1icatlonServices.UnhandledExceptlionEventArgs) 
Handles Me.UnhandledException 


My.Applicatlon.Log.WriteExceptilion (e.Exceptilion, 
IrtaceEventTYDEe. CEITICal;, "Unhandled ExcebDlion.") 
EHC Sub 


حيث يشير البارامتر م فة sوإ‏ 4٤1ء7‏ ٤ء1طAva11a Network‏ التي تمرر معلومات حول توافر الشبكة ولها خاصية مفيدة هي 
Network Ava 1b 1e‏ 1 التي تعيد قيمة منطقية هل الشبكة متوافرة أم لا. 


أرجو ا يکون هذا الشرح ع عجالة مفيدا للجميع في التعرف Appi eatin Events JE‏ حیث یمکنکم الحصول على التفاصيل حول کل 
حدث من هذه الأحداث في مكتبة "S5١‏ المرفقة مع الفيجوال ستوديو 


اخترنا لك من موكتبةۃ السشفرات ... 


IMOOLCES SVGSLEM 
Public Sub GetLanguages () 
' Gets the list of installed languages. 
Dim lang As InputLanguage 
For Each lang In InputLanguage.InstalledInputLanguages 
1IstInstalledLanguages.ltems.Add(lang.Culture.EnglishName & ControlChfsS5. Gi 
Next lang 
ENG SUD 'GeCLONGUaGES 
vb ar 


ab.corm 


مجلةۃ سهرية مجانيةۃ تصدر عن موقع فيجوال بيسك للعرب 


Application Events أحداث التطبيق‎ 


قائوہ الخطوط الموجودة في الجهاز 
کود: 


Dim f As System.Drawing.Text.InstalledFontCollectlion = New 
System.Drawing.Text.InstalledFontCollection 

Dim EFamlLly As FoOnNTESNMLLY 

For Each TFamLlLly In f.Famlililies 
1Ist1InstalledFonts.ltems.Add(fFamily.Name) 

NEXT 


اخترنا لك من وكتبہ الكتبا ... 
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/ اللسي سارب 


CF Programming 


مهما كتبت فلن أوفي الكتاب حقہ, لكل من يريد أن يتعلم البرموجة بلغة ال 2.0 # في وقت سريع جدا و تعلم برمجة 
C#JI Adsl Windows Forms Jl‏ . 

الكتاب يعتمد على طريقة منهجية تعليمية رائعةۃ جدا ولا يتطلب إلا بعض المعرفة بالبرموجةۃ مع أمثلۃ وافيةۃ وشرح رائع جدا 
كما يعتمد على وحدانية الفكرة و التدرح في التعلم حيث يبدا معك من مجرد برنامجح بسيط إلى نظام كامل لعرض الصور. 
على العكس كرا يعتقد البعض, فهذا الكتاب لا يعالجح إلا قسم واحد من ال 110۲4۲¥ ككهاCc‏ مكBa‏ الخاصة بال 
.N Net Framework 2.0‏ و مو مجال الئسواء System. WINnd0WS.FFONS‏ بوا یزخر بہ ون فنات کوا یعالج 
الکتاب هندسةۃ الوکونات الورنیۃ 0۸61م C٥‏ اVisua‏ و الدوت نت Components‏ بطریقۃ اکادیمیۃ بحنتۃ 
توكنكف ون تعلم أساسيات برمجة المكونات لتوزيعها كما يتعلم القارئ الطريقة المثلى لتحرير الشفرات البرمجية. 
كتاب قيم جدا لمن يريد أن ينتقل من الفيجوال بيسك 6.0 أو الفيجوال بيسك .نت كما أنہ جيد للمبتدنين في البرمجة. 
صورة الغلاف: 

المحتويات 

Part 1 Hello Windows Forms LOL Wrredouws Forms Programming with C# 


1 Getting started with Windows Forms ك‎ 

2 Getting started with Visual Studio € 

Part 2 Basic Windows Forms و‎ 1 N D0 OWS 
[ 


3 Menus 
د‎ 


4 Context menu and status strips 

5 Reusable libraries 

6 Files and common dialog boxes 

7 Dialog boxes 

8 Text boxes 

9 Buttons 

10 Handling user input and encryption 
11 List boxes 

12 Combo boxes 


13 Tab controls and pages Erik Brown 
14 Dates, calendars, and progress bars 

15 Bells and whistles 

16 Tool strips 

Part 3 Advanced Windows Forms 

17 Custom controls WE uannins 
18 Explorer interfaces and tree views 

19 List views ST TE ETE 
20 Multiple document interfaces ا لخب‎ 
21 Data binding Erik Brown :dلؤnئl‎ 
22 Two-way binding and binding sources P ٥5۴ نوع الملف:‎ 
23 Odds and ends .NET حجم الملف:7.54 ميغا‎ 
appendix A C# primer 2 الطبعة-‎ 
appendix B .NET namespaces 544 غدد الصفحات-‎ 


appendix C Visual index 


. 1 8 ان‎ ۰ 
appendix D For more information 2006 ريخ النشر:‎ 


دار lلiiر: MANNING‏ 
| لتنز يل الكتاب اضغط هنا 


نافذة مبرمج الفيبى .نت على لف السى شارب 
کے کے ی ا 


إعداد أحمد جوال 


الأنواع والدوال الرئيسية في السي شارب 


C.010٥ 1٤ خصائص الکائن‎ 


هذه المرحلة من الدروس» نستطیع الان الكتابة یں الشاشة 
رق ول راع بورع کو راا ت ج افر 
EE‏ راحة قصيرة لأتعرف غل العناصر الأساسية للبيئةع[0یوه° 
E‏ 


أهم الدوال الت تحتویها الفشة مامئو٥)‏ هي دوال الإدخال والإخراج 
وهي: 
کود: 

Console.Write (string); 

اة 7 

Console.WriteLlLine (string) ; 

بها ييه افر الاتقال فط مم تلض الكنابة 7 

الا 

string x=Console.ReadLine (); 

ريق الوا من مات اقرادة 7 

انتر ضغط مع القراءة من 

int x=Console.ReadKey () ; 

ويتم فقط واحد حرف قراءة // 

إنتر ضغط مع القراءة 

ConsoleKeylInfo r = Console.ReadKey () ; 

القراءة سن والاا ياء فقط واحك خرف فراءة // 

زو ملل يه اى اال معن ۾ اتغاله بحل 

حاص متعر ف التاتج كزين يتح نةا مللا الامسهح 


الانتهاء 


هليه انها ء 


لو کنت مبرمج اعہ.۷8 قم بإزالة علامة التتصيص ؛: من آخر 
الجملة. 


دوال أخرى خاصة بعمليات الألوان مثل إ0 1 ۴٣٥۲٥68۲011 °C0‏ 
للون النص و إ10هZ٤ك”uهءإوءهع8‏ للون الخلفية » تستطيع 
تعيين اللون عن طريق الفئة إه 0١۸١5٥01٠١٤٣٠٥1‏ بالشكل التالي: 


کود: 
ConSole.ForegroundColor =‏ 
CORNnSOLECOLOFE TEL LOW?‏ 


هناك خصائص أخرى Titles WindowWidth Jia‏ 
وخلافها أتحديد مظهر النافذة. 


نعود لأحد مواضيع الطباعةء لنفترض أننا نريد القيام بطباعة النص 
التالي: الاسم (المتغير مصهم) و العمر (المتغير معج)» يمكننا القيام 
بذلك عن طريق كتابة الكود التالي : 


کود: 


" + name + " — 


Console.Write ("First Name: 
Age: " + age); 


أفضل أيضاء بالطريقة التالية: 
vbaarab.corn‏ 


لف السي شارب 


أحود جمال 
کود: 
Console.Write ("First Name: {0} - Age:‏ 
name, age);‏ ,"}1{ 
Regular Expressions ÛJI Iilgتwl lig‏ 
بواسطة الطريفة الثانية » يمكنك عمل تنسیق ۴٥۲٣۵‏ للنص 


باستخدام رموز ل للأرقام و ع لل 1هن)رمومم×م بالشكل التالي مثلا: 


1 


Console.WritelLine ("E format: 
G9999) 


[UE 


LALE, 

string name; 

Dim x As Integer; 
Dim name As String; 


وخلافه كثير» ولكنك بالتأكيد تلاحظ وجود الكلمة سعد في كتير من 


تحويل الأنواع المنطقية 1١٠ط‏ إلى ه15جع والأرقام إلى صفر 
وخلافه. 


لكن هناك آنواع أخرى من البيانات لا يمكنك استخدامها إلا باستخدام 
new‏ متل ال ٤ءء‏ طە و 1s‏ rray1ه‏ وخلافه مما سنتعرف 


هذا هو تقسيم الأنواع في #° : 


الأنواع والدوال الرئيسية في السي شارب 


ValueType 


Any type 
that derives 
ValueType 
i15 a 
or enum 
not a class. 


‘Enumerations and Structures 


الصورة من كتاب. ProCSharp 2008 and .net 2008 p1atform‏ 
جميع الأنواع المشتقة من الفئة )ءعزطا0 تملك بالضرورة طرقه الأساسية متّل و u2a1ا»E‏ و Ge #2510٥‏ وخلافه. 
أما الطرق الأساسية للأنواع الرقمية مثل د ذ و ود1 فتشمل الخصائص الأساسية مثل 


. و إه ا †ء.,151 لتحديد طبيعة المدخلات‎ 15211٤ فيما يحتوي ال إ عط على خصائص مثل‎ MinVa1 ue و‎ MaxVa1 ue 
وسنبدا الحديث حول الفة وم 1إ خو‎ 


SLF1IING Aiقلl‎ 


اث في درسنا هذا حول کل ما یتعلق بالنو ع. gہ1ا)S‏ 


ج 


vbêaarab.corm 


الأنواع والدوال الرئيسية في السي شارب 
الخصانص والدوال النساسية للفئةۃ ودذ٣إخ؟‏ 


Length Aıصlخلl‎ 

تحدد طول النص. 

Compare AJIدلI‎ 

للمقارنة بين نصين. 

Contains AlIدلI‎ 

للبحث عن نص أو حرف ضمن النص. 

StartWith g Endwith jينئلlدلنا‎ 

معرفة فيما إذا كان النص يبدأ أو ينتهي بحرف أو نص معين. 
الدالنينj LastIndexOf g I^"dexOf‏ 


لا اناا 


JIدIلAl Remove‏ 
حذف جزء معين من النص. 
JIدIلA Insert‏ 

إدراج نص داخل ال وہ St]‏ . 
lلدAllI Replace‏ 
استبدال جزء من النص. 


TolLower g ToUpper jيتلlدلl‎ 


لتحويل حالة الأحرف بين هزمه و 1اج٣ء‏ . 


الدالة خ11مSp‏ 


¥ تفسیم | أن“ ) حسب شيء معيین الى مصدفو فة » مذلا ته تفسیح النص مع کل 
علامة (-) إلى مصفوفة جديدة. 


کود: 


IiEWALEAYy = OSD LIL (PF, 


EFINO 


vbêarab.corm 


Dim newarray() As String = G.Sp FF gn. 7F 


لغہ ا لس شارب 


أحود جمال 


دوج النصوص 
الطريقة الأبسط لدمج النصوص هي باستخدام المعالم +» أو باستخدام 
الدالة ع 2ء ١0ع‏ بالشكل التالي: 


SLEINT SS S TIRO LCONCAESL, O2), 


DIM S.A SLT = SCEIRGLCONCEEC(SL, E2), 
يمكنك مراجعة الرابط التالي مباشرة لاستخدام الطريقة الأفضل لدمج‎ 
StringBui11der ill اللصوص عن طريق استعمال‎ 
http://vb4arab.com/vb/showthread.php?p=57289 
مقارنۂ النصوص‎ 


يمكن استخدام المعامل == لمقارنة النصوص في ©C#‏ أو = في 
yl ‘VB.net‏ انه من المفضل استخدام الدالة Equals‏ بالشکل التالی: 


د 


1i 


DIM S5 AE SITING = GTEINOLCONCSE GL, EA; 


Escape Characters ٽllفإلll حروف‎ 


IE Cea 


ا 


٣ 


Console.Write ("My Name: /nAhmed Gamal") ; 


بالفیبی .نت: 
e e a. »‏ 


Console.Write ("My Name:" & vbCrLf & 
"Ahmed Gamal") 


أن تكتب الحرف // يعني مكرر»ء هناك حل آخر وهو استخدام ما 
يعرف باسم كع" S۲‏ ص1اهطإء ۷ حيث يمكنك في هذه الحالة كتابة 
نص عادي بدون القلق من ال sإع†ء 2a‏ ط٤‏ ءمهaءء۴‏ بالشكل التالي 


<F 


٣ 


Con§ole .WritelLine (@"C: \MyApp\bin\Debug") ; 


TT 


e 


الأنواع والدوال الرئيسية في السي شارب 
التحويل من وإلى النوع 9و٣1ءإSt‏ 


اکن لے مارد لکل الان 9 


کود: 
INL x = IMC. ParSE( TIT),‏ 
bool v = pbpool.Parse ("True");‏ 

کود: 
Dim x As Integer = Interger.Parse ("1")‏ 
Dim v As Boolean = Boolean.Parse ("True")‏ 


التالي مثلاً: 


1 


د 


SEEING KEK = Me. LOSLTINGOY;, 
أعتقد أنك بدأت تعتاد على طريقة الكتابة في السي شارب و سأدعك‎ 
لتقوم بترجمتها إلى لغة الفيبي .نت وحدك من والأن وصاعدا.‎ 
StringBuillder Aنidll‎ 


فئة مطورة من ال و١‏ 1 51 تحتوي على مميزات إضافية متل دالة 
دمج النصوص السابقة الذكر. لرءمم۸ 


التعارل وع التاريذ والوقت 


تجد جميع ما يتعلق بالتاريخ والوقت في الفة ٥ص1‏ 1ء ه5 فمتلاً 


1 


د 


DateTime dt = new DateTime (2004, 10, 17); 


لطباعة التاريخ الحالي: 


1 


د 


Console.WriteLlLine (DateTime.Now) ; 


يمكن التعامل مع الوقت أيضا باستخدام الفة رجم؟ءص1"آ 


د 


1 


TimeSpan ts = new TimeSpan (4, 30, 0); 


vbaãarab.corm 


لہ ا لس شارب 


أحود جوال 
عملية الإضافة والطرح باستخدام الدوال Add‏ ي Substract‏ 
بالشكل التالي: 
کود: 
Console.WriteLine (ts.Subtract (new‏ 
LIMESOARNU, LS; UO‏ 
أو 
کود: 


JL = OE, AQQAMORNERS (2), 
أنواع المتغيرات المختلفة.‎ 


التحويل بين المتغيرات المختلة: 
بدايةء تنقسم التحويلات بين المتغيرات إلى نوعين رئيسين: 


Widening Convers1ions -1 
Narrowing Conversions -2 


Widening Conversions /1 


فيها خسارة أي نوع من البیانات» وتسمی باسم یھ لس مں» مثال 
ذلك التحويل من ٤إهطء‏ إلى عد : في المثال التالي : 


کود: 
SRHOFEFE XK = S5;‏ 
power (x);‏ 


و هیکل الدالة power‏ 


کود: 


Int power (int number) 


tetUrET Number 2; 


لو لاحظت ستجد أن الدالة تستقبل بيانات من نوع ا٣‏ 1 فيما را 
لها بيانات من نوع اإمطيء ٠»‏ في هذه الحالة لن تكون هناك مشكلة 
لأن مدى ال خ1 اكبر من مدى ال ٤اإهطء ٠»‏ وبالتالي فإن أي 
مدی لل ٤‏ هطو یقع ضمن ال اہ 1 بکل تأکید. 


Narrowing Conversions /2 


الحالة العكسيةء التحويل من الأكبر إلى الأصغر» مثلاً لو 
کان المتغیران من نوع 1٣٤‏ والناتج من نوع ٤٣إهطء»‏ سيعمل 
الأمر بصورة صحيحة لو كان مجموع الرقمين 1 1 اصغر من الحد 
الأقصى لل ٤1ء‏ » ولكن لو افترضنا أن مجموعهم تجاوز حدود 
مدى ال ٤إ‏ هطع فإن ذلك سينتج مشكلة. 


لهذا السبب» يمنعك المترجم مباشرة من كتابة مثل هذا الكود و 
رسالة الخطا التالية t implicitly convert type 'int' to‏ 
‘short.‏ | 


E 
r 


الأنواع والدوال الرئيسية في السي شارب 
. أحود جمال 


لكن لو رغبنا في التحويل رغما عن هذه النقطة حتى لو نتج عن ذلك ضياع بعض البيانات»ء في هذه الحالة نلجأً لما يسمى بعملية ال یه٤‏ . 


لغہ | لس سارب 


Cast JI ٽlılyec‎ 


لا تنطبق عمليات ال ٤وو‏ على التحويل من اكبر لأصغر فقط » بل يمكن استخدامها في كل عمليات التحويل» ابسط استخدام لها هو 
لتحويل إءوه ا١1‏ إلى ٤إهطك‏ بالشكل التالي: 


کود: 


int var = 10;‏ 
SRNOFTE Varzd = (NOEL) var;‏ 
في الفيبي .نت نستعمل الدالة ءم رآ حيث ١ء‏ مرآ كما هو اسم النوع الذي نريد التحويل إليه 
کود: 
Dim var As Integer = 10;‏ 


DIM. VAZ A8 SHOE = CSOT (VALE; 
في المتال السابق» لو قمنا بطباعة نتيجة 2ه سنجد أنها 10 » لكن ماذا لو افترضنا المتال التالي:‎ 


کود: 
int var = 100000;‏ 
ShOFL vVarz2 = (SNOEE)vaEFE;‏ 


Console.WriteLine (var2); 
Console. ReadKey (); 


النتيجة لن يمكن توقعهاء حيت ستكون النتيجة هي -31072؛ حيث سيقوم المترجم بعكس الإشارات ابتداء من 32768 ومن ثم إنقاص رقم مع 
كل زيادة عن الرقم السابق» أو باختصار فهو يقوم بطر ح الرقم الناتج من الحد الأقصى أو المدى الأقصى للنوع ٤إهطء‏ وهو 32767. 


باستخدام هذا النوع من التحويلات» فانه من المفضل دائما استخدام Try Catsh‏ والتي شرحها الأستاذ محمد سامر في درس السابق» والتي 
سنعود لشرحها في مرحلة اخرى من الدورة بالتفصيل. 


التحویل باستخداض llأفãiۉ Convert‏ 
يمكن التحويل بين أي نوع من البيانات باستخدام الفئة ٤إ ٠‏ ١ه‏ بالشكل التالي مثلا: 


کود: 


MYEVLE = CONT EC LOBE MMVI, 


7 8 
vbêaarab.corm 


بینۃ الدوت نت العا 


.Net Environment” 


تطالعون في هذا العدد... 


وثال وبسط لإنشاء 115- ۸۵d‏ لبیئۃہ تطویر 
.NET‏ نجيب الوجيدي 


تعرف على تقويم فئة أم القرى 


اشير و فاك التشفور في الحو ت - تة 


عصام حنفي! ! !560۲۳15 !!! 
لسریعہ - 


ابدأً لینكف 


لعلك إنسان أنيق و تهتم بوظهر وواجهة المستعول 
الخحاصہ ببرناوجك لذلك قد بهمكت هدا الروضصوع 


مکتیة XPe r1٥1 ٥6‏ مدان فیا أ کنر من 40 ادا جاھزة و محانیخ 
ستعمالها في المشاريك العملاقة وان رغبت في الود يمكنك وهي حسب ما 

رايت أفضل و أجمل بكر مه ملتبة N٥٤‏ .ط1ا Entry‏ کم أنھا تحتو 
على أدوان جد متقرهة ۷ توجد قى الأخيرةء لطلب نسخة مجانية و تحميلها 

http://www. deveXpress.Ccom/ Products/ NET/WebRegistrati 
on/ 


Connect1O® str11q JImصتlll‎ Aةلوج تشفير‎ 


n" . mn a Ha 5 DTI mS O 
بواضصيع منوعہ فى عالم الدوث نت و الفيجوال ستوديو‎ 


سے f oa“‏ 
. ہے ھم ت 

7 س 
او ً1 


وتال وبسط لإنشاء ۸d0 d-115‏ لبیئۃ تطویر .N ٣1‏ 


سنقوم في ما يلي بإنشاء مشرو ع sئ- Add‏ لإدراج التاريخ والوقت الحالي في نقطة الإدخال الفعالة ( مؤشر لوحة المفاتيح ) , ثم نقوم بعمل 
مشروع مد]ءعء لتحزيم البرنامج ونتعلم كيف نضيف ال وم1-ل ل۸ الذي قمنا بعمله إلى شريط الأدوات و كيف نضيف له اختصار من لوحة 


< 


أولا: برناود Add-iDJI‏ 


1. قم بفتح مشروع جديد و في مربع الحوار : مشروع جديد => في Other Project Types رڙتخl Project Type‏ =< 
>=Extensi bility‏ وفي sعatاemp‏ ا اختر sم1-لكA4 Studio‏ اu2aء۷1.‏ في مربع النص الخاص باسم المشروع اكتب 
.InsertDate Time‏ 


| New Project 


Templates: . MET Framework 3.,5 


lH Yisual Basic ¥isıual Studio installed templates 


ادا 
shared Add-in‏ ا visual C+ a sua tudio Ad-n‏ - 


Other Project Types‏ ك 
“Setup and Deployment ¥ Templates‏ 
Database‏ -. 


: : Yisual Studio Solutions 
H- Test Projects 


LrEate an Add-in ladable in a Yisual Studio based host 


Hame: InsertBateTime 
Location; C1 Documents and Settings{PC11Mes documentsyYisual Studion 20031Projects 2 


Solution Name: InsertDateTime Create directory for solution 


Visual Studio Add-in Wizard 
welcome to the Add-in Wizard. 


2 ا ر و 
,sم-‏ ل۸ قم بالضغط على زر التالي و في 
الشاشة التالية قم باختیار اللغة اکى تریدها This wizard will qather information and create the starter code‏ 
VB NET SF‏ و هى الخيار الثاني ثم for an Add-in.‏ 


i 


ا 
| 1 
n0 1N‏ ¡ للل لاا r‏ 


- ¬ 


5 


للوشاركة أو الاستفسار زوروا ووقعنا على النت 0١٠c0ء.vb4arab‏ العدد 01 لشمر يناير 7 فبرایر مون سنة 2008 


وتال وبسط لإنشاء 115- ۸04d‏ لبینۃ تطویر !1 .N ٣‏ 


3 قي الشاشة الثالذة قم بالتأآشير على التطبيق الذي 
ترید من ہ1-ل ۸ أن يدعمه وفي مثالنا هو 
الخيlر‏ JlٺJg Microsoft Visual Studio‏ 
8 ثم اضغط زر التالي. 


4. في الشاشة الرابعة قم بكتابة اسم ال م1- ل۸ في 
مربع النص الأول و,ılكj Insert Date and‏ 
م»]] و وصف له في مربع النص الثاني ثم قم 
بالضغط على زر التالي. 


5. في الشاشة الخمسة يطلب منك المعالج وضع 
خيارات sہ1-‏ ل۸ قم باختير الخيار الأول 
تستطيع تجاوز الشاشة السادسة بالضغط على 
زر التالي مباشرة و في الشاشة السابعة و 
الأخيرة اختر طینہ۴. 


Visual Studio Add-în Wizard (Page 2 of 6] 
Select An Application Host 


Tol can customize Your Add-in so that the user can load it within mulkipls application 
hosts, which applications would You like to support? 


Microsoft Yisual Studion ZO 
[_l Microsoft Yisual Studio 2O08 Marros 


Visual Studio Add-in Wizard (Page 3 of إ6‎ 
Enter a Name and Description 


ûn Add-in needs a name and description to better describe itself to the user, Enter 
these +alues below, 


What is the name of your Add-in? 


InsertDateTime - Mo Name provided, 


what is the description for your Add-in? 


InsertDateTime - Ho Description provided. 


Yîsual Studio Add-in Wizard (Page 4 of 6) 
Choose Add-in Options. 


The following options are available for your Add-in. 


Would you like to create command bar UI For your Add-in? 


fes, create a 'Tools" menu item. By default this will cause the Add-in to load when the button 
is clicked unless the add-in is set to load on startup of the host application 


Tou can fine bune when your Add-in loads: 
[¥1 would like my Add-in to load when the host application starts 


L_J] Add-in will never put up modal UI, and can be used with command line builds 


للوشاركة أو الاستفسار زوروا موقعنا على النت ص0ء.اaاvb4a‏ العدد 01 لشمر يناير / فبراير من سنة 2008 


للمشاركة أو الاستفسار زوروا موقعنا على النت 0٣٠c0ء.vb4arab‏ 


وتال وبسط لإنشاء 115- ۸0٩d‏ لبینۃ تطوير !ا ۴ .N‏ 


بهذا نكون قد انتهينا من إعداد جزء كبير من البرنامج و سيقوم 
۷8.1 بکتابة الكود اللازم نيابة عنا - کتر خيره بيل جيتس , مش مخلينا 
محتاجين حاجة اا و الآن في مستكشف المشروع قم بعرض الملف 
Connect.vb‏ 


و مايهمنا الأن من الإجراءات و الدوال الموجودة هو الإجراء , 8×٥٥‏ فحاول 
کبح جماح حب الاستطلاع قليلأٌ و اذهب مباشرة إلى هذا الإجراء, ستجد الكود 
التالى : 
کود: 
Public Sub Exec (ByVal commandName As String,‏ 
ByVal executeOptlion As vsCommandExecOptlon,‏ 
ByRef varln As Object, ByRef varOut As Object,‏ 
ByRef handled As Boolean) Implements‏ 
1IDTCommandTarget. Exec‏ 
handled = False‏ 
lf executeOption =‏ 
vsCommandExecOptlion.vsCommandExecOptlonDoDefault‏ 
Then‏ 
lf commandName =‏ 
"InsertDateTime.Connect. InsertDateTime" Then‏ 
handled = True‏ 
ERLE. Sub‏ 
ER IE‏ 
ERC LE‏ 
End Süb‏ 


handled = True 
إلى‎ 


کود: 
handled = InsertDateTime ()‏ 


وأسفل الإجراء ×۴ قم بكتابة الدالة التالية : 


کود: 
Public Function InsertDateTime () As Boolean‏ 
TF NOL‏ 
IsNothing (_applicationObjJect.ActiveDocument )‏ 
Then‏ 
CType (_applicatlonObject.ActIiveDocument.Selectlo‏ 
n, TextSelectlion).Text = DateTime.Now.ToStLtring‏ 
ENC TE‏ 
Return True‏ 
EN FUDBCTILOoN‏ 


وبهذا نكون قد انتهينا من البرنامج و يتبقى لنا التحزيم و إضافة ال م1- ل۸ إلى 
شريط الأدوات في بيئة التطوير . 


قم بإضافة مشروع جديد من النوع Setup and‏ 

Deployment‏ واختر {ecزPr0 Setup‏ وقم بتسمیته 
]nsertDateTimeSetup‏ واختر من القائمة المنسدلة 
Solution‏ الخيار «ەutioامء Add t0‏ كما في الصورة 


تشفير جولةÃ‏ lلlتصmصJl Connection StrF1¬G‏ 
وحود جمال الدين 
دعونا نر بصوت عالي سويا.... 
عناما نقوم بعمل موقكة علي الانترت يحنا< إلى قاع 
بيانان... في أي شي نفكر دائما ؟؟؟ 
الإجابة هي: كيف يكوه الأداء سريح جدا وفي نفس الوقت اكير 
أمانا.. کلام جمیل جدا. 
لھذا لجاء الکئیہ منا إلى ملفات ال sعھااگ‏ gاگرCo‏ والني 
تعد مت أجمل الأشياء في العمل بالرون تت عموما. 
»وٻ EXE J| Jıëã Yoُİ ii ail sa Config File J|‏ 
في حالة نطبيق ويندوز أو قبل أف تظهر صفحة الت فى حالم 
Web Applicationd\‏ . 
wplšll Connection String dl Abi lı lily‏ 
بقاعدة البیانان في C0۸11 ۴11٤0|‏ حنی اذا نم نقل 
قاعرة البيانات إلى مكاه آخر نكب المسار الجريد داخل ال 
Config Fe‏ دوه الحاجە إلى إعادة ترجمة المشروع 
انده. 
هنا وصلنا اللي جزء السهولة في الأداي ولكن هل هو في امان 
عن الهاكرز ؟ الإأجابة ۷... بمنتهى السهولة يمك لمخدرة 
المواق& أo Connection Stringdl ylژںل dns‏ 
ویقوم بما يحلو له في قاعرة البيانان. وخصوصا إذا كاه ال 
SQ1 +¢lۍëiı lads Connection string‏ 
Windows Jl wlgو Authentication‏ 
Authentication‏ (ف, حال مرک قواعد البیانان 
o۷ )SQ1ا. Server‏ فی هذه الحالة سیتم کتابه اسم 
المستكرم و كلمة المرور اللاصة SQL Server dl‏ 
الآ ها هو الحل للعمل بأماه. بالا كن الحل الأمثل هو أن 
iقوe‏ شر ConnectiOn S11 J|‏ وهو lyخJ‏ 
Config File Jl‏ 
کود: 
string path = "/web";‏ 
CORELGUEGLLOR CONEILG =‏ 


WebConfiguratlionManager. OpenWebConfi 
GUFaAELoOR (pCR)? 
7 ال فاحل تقفيوة الوات ار‎ 
File 
ConfiguralionSection AppSel = 
COoONnFL1G:GELSECLION (TCONNETELONSEELNGS 
"); 
AppSet.Sectionlnformatlion.ProtectSec 
ELO TDaALAPEOLCECEIONCONTILTUEEELONEPEG 
VICE); 
conflg.Save (); 
E € i ٠ 
ولي نعيده إلى صيغته الإولى .. نقوع بفك النشفير‎ 
کود:‎ 
ApGiEt.SeclLlionInformat lion. UnprotectsS 


ection () ; 
config.Save () ; 


A 


COREG 


العدد 01 ینایر / فبرایر ون سنة 2008 


وتال وبسط لإنشاء 11۸5- ۸4d‏ لبینۃ تطویر !ا .N ٣‏ 


New Project 


Project types: Templates: _NETFramenok3.5___w E3 


E: Yisual Basic Yisual Studio installed templates 

Hl Yîsual CF aS 

E- Visual C+ j1 setup Project O, web Setup Project 

g- Other Project Types I Merge mMaduls Project setup Wizard 

Setup and Deployment (CAB Project „ Smart Device CAB Project‏ ا 

-- Database 
1 E#tensibility My Templates 
.- Yisual Studio Solutions 


Test Projects Cjlsearch inline Templates...‏ و 


Lreakts a Windows Installer project to which Filas can be addsd 
Hame: InsertDate TimeSelup 


Location: Documents and SettingPL 1MEss documentsiYisual Studio Z2008\ProjectsInsertDaktes Tims ا‎ 
solution: dd to Soluti ٠ Lreate directory for solution 


Solution Hare; 


1. في مستكشف المشروع اضغط بالزر الأيمن على مشروع 
التحزيم yواختjر View ==> Custom Actions‏ . 
2. قم بالضخط lEذJ Add custom رتخls Custom Actions‏ ا ت اک 
اوا ا اك مربع کرار اکر نة رون e (Ã projects) Applicati‏ ا 
[3e InsertDateTime 4‏ ¬ 
۴1de‏ واضغط علی الزرOK٥‏ . a a‏ 
ûssemblyInfo, vb‏ 3 
a CommandEar .resx‏ : 
Lonnect, yb‏ 3 ن 
InsertDate Time - For Testing. A4ddIn‏ 3 
InsertDate Time, AddIn‏ 5 س 
Fr InserkDate [Imeheluın‏ - 
Î Detected [‏ --- 


EETEEET 


Custom Action...ateTimeSetup) 


Fila System 
REagqistry 
File Types 


Liser Interface 


za21n05 EE 3 XO 1 A103 121135 E 


Custom Artions 4 | Cu 


Launch Conditions 2% Remove 
| 


ûddRemoyveProgr ams Rename 


Author i Properties 
ect Ip] : 


للوشاركة أو الاستفسار زوروا موقعنا على النت ص0ء.bاaاvb4a‏ العدد 01 لشمر يناير / فبراير من سنة 2008 


وتال وبسط لإنشاء ۸40-11۸5 لبینۃ تطویر !1 .N ٣‏ 


Select Item in Project 


Look iri: | ا‎ File 54stem on Target Machine ¥ 22 


Application Faldar fan Fil, 0 
lA Şllser's Desktop 
E pUlser's Programs Menu Add Output... 


ûd Assembly... 


Source path: 


Files of type: Executable and Script Files (*,exe;* dll} ®. YE vw 


Select ltem in Project 


Look in: Lg Application Folder 


Add Project Output Group 2 x 


Project: InsertDateTirme ا‎ 4 Add Gutput... jp 


alal Assembly, 


Frimarty aUIEpLk 
Localized rêSoUrCES 
Debug 54¥rnboals 


Loantent Files سيظهر‎ Add Output اضغط غل الزر‎ 3 
Source Files کی اتا‎ ٢ [اى‎ 
Docurnentatian Files 8 E 

AL Serialization Assemblies لم موايی:‎ Prımary Output 


لاحظ الصورة التالية... 
: ا 


wonfiguration: 


Description: 


_ontains the OLL or ERE built by the project, 


الآن قم بترجمة المشروعین ز٥۴‏ 1n-ل ۸d‏ و Setup Project‏ بالضغط علی کل مشروع بالزر الأیمن و اختیار ]ں6 تم 
VS.NET. Jİ‏ 


. وقم بتشغیل ملف التثبیت‎ Path ]nsertDateTime\InsertDateTimeSetup\Debug" 
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وثال وبسط لاإنشاء 11۸5- ۸0d‏ لبیئۃ تطویرز 1 .N ٣‏ 


ئلH:‏ اضافةۃ Time Add-11‏ sertD0ateہ!‏ إل شریط أُدوات سنۃ ال 


نع e‏ غي[ بيئة التطوير اختر ف الفائمة Tools‏ الخيار CustONM\17Ze‏ في مربع الحوار التالي اختر التبويب Commands‏ ومن 
Categories‏ اختر مل ك۸ » سيظهر في الجهة المقابلة برنامجنا الصغير كما في الصورة التالية 


Customize 


` Toolbars  Lommands 


_aleqorias: Lommands: 


I EN اخ‎ 4) InsertDateTime 
Build 

Llass Diagram 

rystal Reports 

Laka 

Database Diagram 
Debug 

DSL Tools 

Edit 

File 

Formal 

Help 

ImagE 

Insert 
Layout 
Macros 


Modify Selection ” Rearrange Lommands... 


To add a command, drag the command fram the Commands list and drop the command oan the target 
toolbar or menu. 


قم بوضعه على شريط الأدوات بطريقة السحب و الإفلات , وتستطيع تخصيص اختصار من لوحة المفاتيح لتشغيل البريمج - تصغير 
برنامج ت وذلك بالضغط على زر ١إه0طرعK‏ وفي مربع الحوار الذي سيظهر تأكد من تحديد لل10۸.۸)٥۸‏ ثم ضع مؤشر لوحة المفاتيح 
علی مربع النص sءرعk‏ {tcuاoطS؟‏ sیمإ٥P‏ وقم بالضغط علی الأزرار C)1+۸1+1‏ ثم اضغط علی زر تعیین ہعاییA‏ تم .0K)‏ 

وأخيراً لتجربة البرنامج قم بفتح مشروع جديد , ثم أضف ملف نصي , أو ضع مؤشر لوحة المفاتيح في أي نقطة داخل محرر الكود 
راكد كى ا راا اح ك ر اكا ا ا ل ف دد ان ا د و اة ع ا د 
ومن يدري قد توفق ببيعه لأحد المغفلين ت . 


“LuLLL lu lm E K1‏ لعا 


س س و ا اس سم 
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للموشاركة أو الاستفسار زوروا ووقعنا على النت ٠٣0‏ c0ء.vb4arab‏ 


بینہ الدوتث نت 
تقویم UmMAlQuraCalendar Class ىرقلl pi‏ 
حgد‏ ڊدرBADRMED1۸A‏ 
في بيئة دوت نت 2005 يوجد ووه1٤‏ جديد يعود بتقويم أم القرى لمن يحتاج للحصول على التاريخ الهجري. 


کود: 


Dim UmQ As New System.Globallization. UmAlQuraCalendar 


للحصول على التاريخ الحالي : 
کود: 


Dim GetingDate As Date = Date.Now 


نعرف لليوم متغير ونرسل للفئة لنحصل منها على اليوم الهجري: 


کود: 


Dim hijriDay As Integer = UmQ.GetDayOfMonth (GetingDate) 


کود: 


Dim hijriMonth As Integer = UmQ.GetMonth (GetingDate) 


نعرف للسنة متغير ونرسل للفئة لنحصل منها على اليوم الهجري : 


کود: 
Dim hijriYear As Integer = UmQ.GetYear (GetingDate)‏ 


اخترنا لك من وكتبہ الكتّبا ... 
LINQ İl‏ إگراء ا کل مسلم فی أک مان 
محتویات الكتاب: 
الفصل الذول : ميزات لفة #Cل‏ 
الفصل الثاني : أساسيات 1.1NQ‏ 
الفغصلJ‏ JlÛlث: LINQ 1o SQL‏ 
عدد صفحات الکتاں: 53 صفحۃ 
حجم الكتاب: 3 61 كيلوبايت 
الوولف: وجهول. 
رغم أن لغة السي شارب هي المستعملة في الكتاب. إلا أن كغ الل الح الحدءة لل لات 
القارئ العزیز سیجد فيہ معلومات قيوةۃ عن بعض خصائص Tg‏ 
هذه التقنية الجديدة بغض النظر عن لفة البروجة الوستعمولة. 
وحاولۃ جيدة جدا من المؤلف جزاہ اللہ خيرا. 


LINO ابدأً‎ 


ا ۳ 
اا C2‏ 
اا 


IINVERNO 


yvbaêarab.fCorm 


7ة تشهرية وجانية تصدر عن موقع فيجوال بيسك للعرب 
57 


التشفير و فك التشفير - نظرة سربعة - 


عصار حنفی!! 60٣15!‏ !!! 


البييانات تستطيع حفظها أو نقلها من خلال شبكة )ام سء" بكل سهولة مع ذلك فأنك تستطيع استخدام متطلبات للتصريح لكي تقوم بالسيطرة 


مبدئيا » عند دخول المهاجم إلى القرص الصلب 1.5 أو البنية التحتية لل kإمساه"‏ يستطيع بطرق ملتوية التعديل والعبث ببياناتك 
وارد ا ا 

تستطيع استخدام التشفير cryptography‏ لحماية بياناتك الخاصة والتي يحفظها برنامجك أو يقوم بنقلها عبر أو الى أي تدفق 41ع ])9 . 

ال .Net Framework‏ يزودك بفئات لبعض الأنواع المختلفة من التشفير رطمهإعهامرإء متضمنا التشفير التناظري عإ٣)مدصصطرء‏ و 
غير التناظري - عا٣مصصريه‏ و المزج ع, اطهط والتوقيعات الرقمیة digital signatures‏ . 

symmetric enCryYpİ101 ڪرظاننلاl التشغفير‎ 

يستعمل هذا النوع من التشفير مفتاح سري وحيد رع عi)امصصر؟‏ أي المفتاح المتناسق و يعرف بأنه مفتاح تشفير سرى يستخدم لعمليتين 
التشفير وفك التشفير ال encrypt‏ وال decrypt‏ للبيانات . 


الخوارزمي الذي يعمل بهذا المبداً یعرف باسم ال cipher‏ يقوم بمعالجة النصوص البسيطة بمفتاح التشفير السري لک يقوم بانشاء البيانات 
المشفرة والتي تسمی )×ع) cipher‏ و هو آمن الى حل کبیر حيث 5 یمکن معرف النص الكامل Plain Text‏ بدون معرفة المفتاح السري 
Secret Key‏ 


خوارزم ال ااام صصر؟ يعمل بسرعة عالية جدا وهو ملائم ومرن جدا عند تشفير بيانات كبيرة الحجم وهو أمن ومحكم ومحل ثقة عن 


بشکل أخر مهاجم النظام يستطيع مطابقة النص المشفر باعطاء Cipher Text Jl‏ والوقت المناسب لفكها لک يتعرفی غل النص الكامل»› 
المهاجم الذي يريد اقتحام نظامك یحتاج إلى استخدام ۸)٤)‏ ءcإه۴‏ مBrut‏ على سبيل المثال لكي يقوم بتوليد الجميع المفاتيح الممكنة 
Symmetric Ke‏ وذلك بتجربة جميع المحاولات لاستنتاج أو لتولıد‏ |— Symmetric Keys‏ . 

N O O O E O O E 
التشفير لهذه الرسائل.‎ 


Flain Teaxî 
Message 


Diagram I. SYmmretrie Eneryptiani 
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التشفير و فك التشفير - نظرة سربعة - 


عصام حنفی!!!ءزاه‌8!!! 


أثناء نقلك للمفاتيح مثلا فعملية النقل والتحويل تتم من خلال تحويل الرسائل إلى رسائل صوتية من خلال )اسع ٥,٥ط۴‏ وترسل فیزيائيا 
ن کا ارت اکر ری کے کل لے اال ع اک ها ان متم المر مل ر لل اا ا ا فر رفك ار 


لأي عدد من الرسائل المحولة داخل النظام. 
فنات التشفير التناظرى داخل بيئة الدوت نت 


جميع الفئات الخاصة بالتشفير نجدها داخل مجال الأسماء 
SGyYSLEM: SECUCLILCYV.CEVDPLCOGEABRAY:‏ 

يدعم اطار عمل الدوت نت الخوارزميات: cRC2 <“DES‏ 
TrıpleDES <‘Rijndael‏ 

سنستعرض في هذا المقال الفئات التي تستعمل هذه الخوارزميات 
بصورة مبسطة» كما يمكنك تصفح جميع المعلومات عنها في 
.MSDNJ'‏ 

: RijndaelManaged Aفأdلl‎ 


يدعم Rijndael „ajرlgè .Net Framework —l‏ 
symmetric encryption algorithm‏ بمعاییر تشفیر رسمیة آو 
حکومية government encryption Standard‏ › ويصنف هذا 
edْعdae1!Mana Rijn‏ هو الخوارزمي الوحيد في إطار عمل 
.Net Framework‏ الذي يدار آدارة كاملة ومحكمة من قبل 
الإطار» باقي خوارز میات التشفير تندرج تحت unmanaged‏ 
اء حیٿ تستعمل خدمات و دوال ال ۸۴1 الخاصة بالتشفیر 
التي يوفرها نظام التشغيل ويندوز 

خوارزمي ال 4ءعع2مة1NءعaلمزنR‏ خيار راقي ومتقدم عند 
تشغيل برامجك تحت بيئة موثوق trusted environment li‏ 
مثل بیئة W1 ٣d 0w sS‏ . 


:۸٤٥C2 الفنۂ‎ 

هي عبارة عن معايير تشفير قياسية مصممة لاستبدال ال 
5 الذي يعمل من خلال استخدام أحجام أو مساحات أصغر 
الفنہ DES‏ : 

ھی اختصiر‏ جذ Data Encryption Standard‏ 
هو عبارة عن خوارزم تشفير متناسق والذي عمل باستخدام 
ذكرها من باب الشمولية). 
:TripleDES Ail‏ 

إطار عمل kإoسwعصه۴‏ {Ne.يزودك‏ ویمدك بالفئة 
5ا1م1اآ و الخوارزمي الذي تستعمله يسمیى 3 5٤58‏ 
encryption algorithm symmetric‏ وهی تقوم بتطبیق 


CVSLENM:SCECUEILLCV.CEVOLOOESAPNGOY SÎ 
etricAlgorlithm 


السابقة مشتفة 


للمشاركة أو الاستفسار زوروا ووقعنا على النت ٠٣‏ c0ء.vb4arab‏ 


لعلك إنسان أنيق و تهتم بوخلهر وواجهة المستعمل الخاصة 
ببرناوجك لذلك قد يهميك هذا الموضصوع 


تة غEntryLib.ne‏ عبار عه محموعة مه التمات للفورم 
والأدوات موجه من أجل تحقيج معر جير لأدوايك على الفورم . المشكلة 
الوحدة لهذه الأدوات أك مضطر لمتلاك مبلخ $199 كبراية لتستطيدة 
شراء حقوق هذه الملنية. 

ومے أنه ما زال باملانك تجربه نسخة تجريبية مت البرنامج من على هذا 
ال |ٳ: http://www.kliksoft.com/?9=2&SS=14‏ 

إل أ هذا ليس هو الهرف مت مقالتنا . الهف الأساسي هو عمل تمهي 
لعالم تصميم وتجمیل مظهر البرنامج . أنا شخصیاً له أشتري في يوم ما - 
على ها أعتقد - هذه الأدوات . ويكقينى عنذراً فى هذه الحالة المقابل المادي 
لهذه المجموعة مت الأدوات والني تصل إلى $1999 حال ريت في 
النسخة الكاملة مك السورس كود » وهذا الأهر ليبس ضمت مخططاني في 
الحياة على أية حال. (حتى في منامي لم أجد الرقم $$1999) 

مکتیة XPer i16‏ مانب فیھا أ کثر من 40 ادا جاھزة و مجان 
استعمالها في المشاريك العملاقة وان رغبت في الكود يمكنك دفة وهي حسب 
ما رأیت أفضل و أجمل بتر ai u Entry Lib. Net ön o‏ 

نحتوي على أدوان جد متقرهة ۷ توج في الأخيرةء لطلب نسخة مجانية و 
ندمدلها 


http://www.devexpress.com/Products/NET/WebRegistr 
atlon/ 


الهدف مت هذه المقالة تلان تقاط 

النقطة الأولىء هي أننا بحاجة للبدء بتعلم وسائل تحسيت المظهب حاليا 
يعر عالم شنت ۷٣٣۳‏ ہو المقصود لا کھبر ھج ..net‏ هناك درس 
للأ عصام !!! sنامBo‏ !!! عن هذه التقنية وأضمك أنني استطيح أو 
طك أحر الأخوة لقديم درس عملي حول هده التقنية في المسنقبل القريب 
فما زلنا فى حاجة لبعض المعرفة بها » ولكن حتى ذلك الوقن هذا رابط لنلک 
التقندة هت موقA‏ ماڌ وguفhttp://wpf.netfx3.com/c‏ 

وعدا دريف لها مت الموسوعة الحرة ویکیدریا : 
http://en.wıik1ipedia.org/wık1/Wındows_Presentatilon_Fo‏ 
undation‏ 


النقطة الثانية . ۷ ننرهش لو علمت أه الإقبال على هذه الأدوات كيير جرا 
١‏ وأ الشركة المنتجة حققن أرباحاً جيرة مث وراء هذه الأدوان وغد ها 
هت الأدوات الممائلة . فى حيت أه الجهد المستغرة في إنشائها ليس بسيطاً 
ولكته لبس دخماً » ربما نستطيك في بوم مه الأيام مشاهدة منتج مه شركة 
عربية بهذه الكيفية والجودة. 
النقطة الثالثة . يتجه العالم كله هذه الأيام ناحدةة فصل التصميم عه الكود 
على أن التصمدم أو الاستایل دیا یمکه اسندامه أ كدر مت مر ابنداء ھن 
5ا المواقع وانتهاء بما تنتجه مايکروسوفت في معاملها هذه الآونة هك 
AML‏ لا علينا البدء مبكراً في إتباع هذا الأسلوب رغم أه الموضوع 
لس جبيداً » ولك أرجو أه ۷ نكون آخر الواصليت. أ 
A‏ 
ر 
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تطالعون في هذا العدد... 


في هذہ الحلقۃ من حلقات السلسۂ الذھبیۂ في المواضصیع العلمیہ سنتعرف 
بإذن اللہ تعالى على طريقة تمرير البارمترات إلى داخل برنامح من برامج الويندوز! 

و لكي نفهم سوياً ما المقصود من ذلك دعني أذكرك بكيفية تمرير 
الباروترات إلى آي إجراء تقوم بتصميمہ فمثلاً إذا افترضنا انك تريد أن تقوم بإنشاء إجراء 
بسیط وظلیفتہ عرض رسالۃہ معينہ ينم تمريرها إلى الإجراء .. 


سلسلة من المقالات. أحاول فيها تحفيز مبرمجي 0.× 8451٤‏ أهuء۷‏ العرب إلى 
مواكبة التيار والهجرة بلا عودة إلى احد لغاٿ إطار NET Framework. Jac‏ 


هل أنت وبرمد فیجوال بيسكت 6؟.......... اضصغفط ہنا 


ا ل ون وة اک 
كتاب الذستاذ تركي العسيري... 


اخترنا لاك ون کا 1 ™". . ات 
تغيير أسماء وحركات الأذقراص 
كيفية وعرفة حالة الاتصال بشبكة الانترنت 


ها هي الدوال : 
الدوال هي اع محجوزة ومعرفة من قبل الفيجوال بیسك 
ل من ل المفر اتو فے الفط رر ےآ م 
ابسط واعم هي عبارة عن برنامج صغير مكتوب مسبقا و محفوظ 
داخل لغة الفيجوال بيسك يمکن استدعاءه من خلال برنامجك 
والاستفادة منه » إضافة إلى ذلك يمكنك أنت أن تكتب دالة وتستدعيها 
أكثر من مرة داخل برنامجك . 
والدوال في الفيجوال بيسك تنقسم إلى: 
1. الدوJl‏ lئريlضة Mathematics Functions‏ . 
2. دواJ String Functionsٽٿlilyبll Jwîlw‏ . 
3. دوال الوقت و llتlرıخ Date and Time Functions‏ . 
4. دوال التحقق من IgiÎع‏ llبlıنlٽ Data Type Inspection‏ 
.Functions‏ 
5. دوال المدخلات و lاlنnخرجlزتٽ Program Output and‏ 
User Input Functions‏ . 
6. دوالJ Financial Functions ll‏ . 
7. دواJ‏ llتحويںٽ Conversion Function‏ . 
8. دوال التعامل مع الفهارس. 
0. دوال المصفوفات. 
1. دوال متنوعة آخرى. 
12. دوال معرفة من User Defined Functions جaربمئll Joa‏ 
(UDF)‏ 
ونلاحظ أن نوع الدوال من رقم (1) حتى رقم (7) أنها دوال 
مسبقا لكي تستخدمها مباشرة أما النوع الأخير فيتم تعريفه بواسطة 
المبرمج» أي بو اسطتاك انت 
1. lالدJIa‏ llرluضۉıۃ .Mathematics Functio0s‏ 
الدالة 5طا2 : ترجع القيمة المطلقة لآي عدد وترجعه من نفس نوع 
البيانات المعطى للدالة والمقصود بالقيمة المطلقة هى قيمة العدد بدون 
إشارة فالقيمة المطلقة ل (-13) مثلا هي (13) وهكذا, فمثلا لو كتبنا 
الكود التالئ 
کود: 
myNumber = Abs (-45.6)‏ 
LxtAbsResult. Text = myNumber‏ 


فان نتيجة تنفيذ الدالة هي 6 .45 = myNumber‏ 

ولاحظ أن القيمة المدخلة للدالة لابد أن تكون عدد أو تعبير عددي فاإدا 
كانت القيمة المدخلة للدالة 11× ستكون النتيجة 11ن وإذا كانت 
القيمة المدخلة للدالة متغير فارع أو لم يتم تعيين قيمة له ستكون اأنتيجة 
0. 

الدالة »5 : تستخدم هذه الدالة في تحديد الجذر التربيعي لرقم معين 
وتأخذ الصورة العامة التالية. 

کود: 


vbêarab.corm 


مجلۃ سهرية مجانية تصدر عن موقع قيجوال بيسك للعرب 


MYNUMOEE = SOF (LO) 
LxtSqrResult. Text = myNumber 


فإن نتيجة تنفيذد الدالة هي 
myNumber = 3.1622176‏ 


شرد وعظو الدوال البرمجية الموجودة في الفيجوال بيسك 


مصطفی اسماعیل 
الدالة :1,٥٥‏ تستخدم هذه الدالة في تحديد قيمة اللوغاريتم العشري 
لرقم وتأخذ الصورة العامة التالية : 

کود: 


myNumber = Log (20) 
LxtLogResult. Text = myNumber 


فإن نتيجة تنفيذ الدالة هي 2.9957327 = myNumber‏ 


الدالة × : 
اللوغاريتم الطبيعي مرفوعة بقوة الرقم الذي تتضمنه حيث (ع) 
تساوي تقريبا 2.7182818 وتأخذ الصورة العامة التالية: 


تستخدم هذه الدالة في تحديد القيمة (ع) وهي قاعدة 


کود: 

)رقۃ ( myNumber = Exp‏ 
الدالة ۸1١‏ : وتستخدم هذا الدالة في توليد أرقام عشوائية تقع ما 
التالية: 
کود: 


myNumber = Rnd (ددe)‎ 


تشغيل الدالة مرة أخري ينتج رقما آخر مثل 0.533424 وهكذا. 


التصريح <٠١‏ 0۳ك R۹1١‏ : يعمل هذا التصريح مع الدالة لرR‏ 
لأنه يعتمد علي ساعة النظام لديك . ويأخذ الصورة التالية. 
کود: 


Randomize 
MSGEOR INL CLO * RIQY F 1L) 


وهنا نعمل علي توليد أرقام عشوائية من واحد إلى عشرة . 

أما إذا أردت أن تجعل هذه العشوائية نصوص وليس أرقاما فلك 
طريقتين لتحايل علي هذا أما أن تضع النصوص في قاعدة بيانات 
وفي شكل سجلات وتعطي لكل سجل رقم أو تضعه في مصفوفة 
وتعطي لكل نص رقم أيضا وأنا أفضل الطريقة الأولى لسرعتها. 
الدالA‏ ئIn‏ وتستخدم هذه الدالة لحساب الجزء الصحيح فقط 
من رقم يشتمل علي أرقام صحيحة وعشرية أو بعبارة أخر لحذف 
الأرقام العشرية الموجودة بعد العلامة العشرية بدون تقريب وتأخذ 
الصورة التالية: 

کود: 


MVNUMDEE = INCE (332:04) 


فإن نتيجة تنفيذ الدالة هي 332 = myNumber‏ 


الدالة 2٤١‏ : تستخدم هذه الدالة في حساب مقلوب ظل الزاوية 
ET‏ للرقم الذي تشتمل علية مقدار بالتقدير الدائري (Radian)‏ 
وا الور ةا ف 

کود: 


MUMMIES = AES) 


الداله "a9‏ ° تستخدم هذه الدالة في تحديد قيمة ظل زاوية معينة 


صر ا 
کود: 

MYNUMDEE = TaN ةة‎ sy) 
الداله 0sهC0 : وتستخدم هذه الدالة في تحديد قيمة جيب تمام الزاوية‎ 


معينة وتأخذ الصورة العامة التالية. 
کود: 


MYNUMDEE = COS) 


الدالة 511 : تستخدم هذه الدالة في تحديد قيمة جيب زاوية معينة 
وتأخذ الصورة العامة التالية. 
کود: 


myNumber = Sin (م۾قãëر)‎ 


الدالة 10ا٥۸‏ : وهي دالة التقريب التي من خلالها يمكنك تحديد 
عدد الأرقام العشرية وتأخذ الصورة التالية: 
کود: 

myNumber = Round (4.52696, 2) 


حيث 4.52696 الرقم المراد تقريبه أما الرقم 2 فهو عدد التي ستقرب 
بعد العلامة العشرية وسيكون الناتج 4.53 


الداله ٣1×‏ وهي تشبه الدالة ]n†‏ تماما أي انها د تستخدم أحساب 
کود: 
myNumber= Flx (4.52696)‏ 


فإن نتيجة تنفيذ الدالة هي 4 = myNumber‏ 


.Strinqg Functions تlilgıll‎ Jwllw Jlgد‎ .2 


IلدAI Array‏ تحول عدة بيانات مدخلة كنصوص تفصلها 
فاصلة إلى مصفوفة يكون رقم أول عنصر (Lower Bound) lè‏ 
هو (0) فمتلا لو آدخلنا النص التالي إلى الدالة . 

کود: 


myNumber= AFEAV{(TELTETT "Second" 
FTI , TTT J 

Print myNumber (0) 

PELINE MYNUMDEE (1 

Print myNumber (2 

Print myNumber (3 


نرى أن النتيجة هي 


۶ 


vbêaraB.fcorîî 


First 
Second 
Third 
Forth 


شرح وعظم الدوال البروجية الموجودة في الفيجوال بيسك 


ورصطفی إسواعیل 
أي ل المتغير إءطسنں »رم يحمل مصفوفة ممتلئة بالنصوص 
المدخلة بعد أن تحولت إلى عناصر للمصفوفة. 

لاحظ أن المتغير my Number‏ کان من نوع variant‏ لأنتا لم نعلن 
عنه ويمكن للمتغير من هذا النوع أن يحمل مصفوفة وكذلك يمكن أن 
تكون المصفوفة من أي نوع آخر فالمصفوفة المستعملة في المتثال 
هي مصفوفة نصية بينما لو كانت العناصر المدخلة أرقما (لاستعملنا 
علامات التنصيص مع الأرقام حتى لا تعتبر نصوصا) لكانت 
مصفوفة من نوع هوه "!1 مثلا . 

الدالة ۸5٥‏ : ترجع كود الرمز المدخل (عمdە€‏ 11 €S؟۸)‏ فمتلا 
الحرف ۸ له الكود 65 فعند إدخال حرف ۸ مثلا ستكون النتيجة 65 
وهكذا ( لاحظ أن حرف ۸ يختلف عن حرف ج في الكود). 

کود: 


myNumber = Asc("a"”) 


تجد أن lئnتغıر_ myNumber‏ أصبح يحمل القيمة 97 . وهكذا .. انتبه 
فيما لو غيرة الحرف من صغير إلى كبير ستتغير القيمة إلى 65. 
الدالة ء5 ة٤‏ : وظيفتها بسيطة جدا فهي ببساطة تحول حالة 
النلص المدخل من حالة الأحرف الصغيرة (ءإم)) ع[ 1ا2ص؟) إلى 
حالة الأحرف انکبيرة (Capital Letters)‏ 

فالمتال التالى يخول "1267 غ 2غ۲ إلى ”7 "1AF1A۳126‏ 
کود: 


Ucase("taftafl267") 


الدالة ءءة٤1‏ : تعيد الدالة مءه٣,]‏ نسخة من النص ودط ذإو 
تكون فيه جميع الحروف صغيرة عوهءع [0w‏ المتغيرة )×ع ۷1ر 
في المثال التالي ستحتوي على عبارة : ksاw0‏ )1 

کود: 


myText = "It Works" 
myText = LCase (myText) 


الدالة عط : تقوم الدالة عع بأخذ قيمة بين 0 و 255 وتعيد 
الحرف الممثل لهذه القيمة في جدول رموز ۸5٣11‏ » على سبيل 
المثال العبارة التالية ٠‏ 
کود: 
H1,‏ 
I'm "TafTaf"‏ 


ستجد آنك لا تستطيع كتابتها بهذا الشكل: 
کود: 


MYLES E Ip CE ILE CE OD 


لأن البرنامج سيعتقد بأن نهاية السلسة النصية السابقة هي عند 
علامات الاقتباس التي تقع مباشرة قبل كلمة fه۴1ه1‏ وستظهر لك 
رسالة خطأء لذلك فإننا نلجاً لاستخدام الدالة اطع حيث أن رمز علامة 
الاقتباس المزدوجة في جدول ۸68٣11‏ هو 34 فتكون الصياغة 
الصحيحة للعبارة البرمجية السابقة كالتالي: 

کود: 


molest .= WHI, & SBCELE € Im 
C-OhESAY & aT TE EES 


7 ل‎ uk 


الدالة 1.٠١‏ : ستجد فيما بعد حاجة في كثير من الأحيان لمعرفة 
طول السلسلة النصية ( عدد الأحرف )» ولعمل ذلك استخدم الدالة 
ده.1» مرر إليها النص وستعيد لك عدد الحروف. 

کود: 


MYLERNGLCR. 3 LEN (FTE TTT) 


الدالة ۲.5٤٣‏ : يمكنك بواسطة هذه الدالة معرفة أول مكان 
يظهر فيه نص ما ضمن نص آخر أكبر منه, الوسيطة الأولى هي 
وسيطة اختيارية تحدد مكان بدء البحث» أما الوسيطة الثانية 1 string‏ 
فتحدد السلسلة النصية التي سيتم البحث فيهاء والوسيطة الثالثة 
2 )یتحدد السلسلة الأنصية الى سیتم البحث عنها في السأسلة 
الأولىء أما الو سيطة الأخيرة فهي اختيارية أيضا و تحدد نوع المقارنة 
التي يجب إجرائها وهي تأخذ أحد الثوابت التالية : 
vbBinaryCompare‏ - 0 
vbTextCompare‏ - 1 
والفرق بينهما هو أن الأولى تراعي حالة الأحرف والثاني لا تراعي 
حالة الأحرف . 
في المثال التالي المتغير¡ سيحتوي على القيمة 1: 
کود: 


a o a 


وأما المتال التالي فسيحتوي ¡ فيه على القيمة 3: 
کود: 


SE JMOL QANTILETET T™) 


حيث أن الدالة في المثال السابق ستبحث عن الحرف ١‏ بادئه من 
الحرف الثاني ولذلك فهي لن تجد الحرف الأول 
JlدAll InStrRev‏ وهي شبيهه بدالة إخیہ1 (وقد سبق 


RG 


کود: 


Print InStrRev ("Mostafa", "a”) 
PFINE INSLCE(TMoSTEaTa", a") 


بالنسبة للحالة الأولى سيكون الناتج رقم 7 لأنها تبدأ من نهاية القيمة. 
أما في الحالة الثانية فسيكون الناتج 5 لأنها تبداً من بداية القيمة. 


الدالة ااك : قد تبدو الدالة ٤ء‏ متشابهة مع الدالة مء › إلا أنها 
تؤدي وظيفة مختلف تماماء فهي تحول الأرقام إلى سلاسل نصية 
وهي تفيد مثلا في حال أردت أن تقوم بالتحام بين رقمين فتقوم بتحويل 
كل منهما إلى سلسلة نصية وتطبق بينهما جمع السلاسل ( » ) الذي 
يختلف عن جمع الأرقام وبالتالي تحصل على سلسلة جديدة يمكنك أن 
تحولها ا رقم من جدید» علی سبیل المتال الدالة myNumber‏ 


.123456 تحتوي على القيمة‎ 
کود:‎ 
myNumber = Str(123) & Str (456) 
vb4arab.com 


مجلۃ سهرية مجانيةۃ تصدر عن موقع قيجوال بيسك للعرب 


شرح وعظم الدوال البروجية الموجودة في الفيجوال بيسك 


رصطفی إسواعيل 
ستواجهك مشكلة في الشفرة السابقة حيث يقوم فبجوال بيسك بإضافة 
مسافة قبل كل سلسلة نصية تنتج من الدالة السابقة . 

الدالة 7٠1‏ : وهي تحول السلاسل النصية إلى قيمة رقمية وهي 
عكس الدالة () إعء التي تحول الأرقام إلى سلاسل نصية وتأخذ 
الور 

کود: 


myNumber = Val (txtMyNumber.text) 


وهنا تعمل الدالة علي تحويل القيمة الموجودة في إءعطصMy×Nuخ×خ‏ 

إلى قيمة رقمية. 

الدالة 1.٠۴٣٤‏ : حيث تقوم بوضع سلسلة نصية و,ذإاء وتحدد 
الجزء الذي تريد اقتطاعه من بداية السلسلة ط)عمء] ٠‏ والتعبير بكلمة 
مرا لاا دى من ا اا ن ها ك بحت اها ف 
السلاسل النصية للغات التي تكتب من اليمين إلى اليسار مثل العربيةء 
هنا تعيد السلسلة العدد المحدد من الحروف من اليمين أي أنها لا تهتم 
لاتجاه ظهور أحرف السلسة وإنما اتجاه تخزينهاء ولأتخلص من هذه 
المشكلة سنتر ل اة اة 

الدالة ٤1ن R1‏ : مطابقة للدالة ۶م في كل شيء» إلا أنها تأخذ 
الد المخد من اخرو م ا ا 

الدالة ك 11 : تعيد الدالة يز عددا من الأحرف قدره طاعہء!] 

بدءا من حرف معين هو ١۲ه)ء‏ › في سلسلة نصية وم ذإء لاحظ 
أيضا أن الوسيطة طعهء!] اختيارية وإذا لم تمرر بها أي قيمة فإن 
الدالة ستعيد الأحرف إلى نهاية السلسلة . 


في. المثال التالى ستحترى. المتغرة اءه درم على العبارة ٠‏ 
ToT.‏ 
کود: 

MYVICKE = MILO TIM TALIA, lg 


أما في المثال التالي فستحتوي على الكلمة: ۴م۴1 م1 
کود: 


MVLIEKE. = Mid TE Tm TACT", 5) 


التصريح ل 111 : يقوم التصريح ١ذ"‏ باستبدال مقطع محدد من 
النلص بنص آخر» وهو يكتب في صورة مشابهة جدا لطريقة كتابة 
دالة ىس ولكن توضع بعده فة مساواة وبعدها العبارة الجديدةء 
في المتال التالي ستحتوي المتغيرة خ×١٠1ر"‏ على القيمة ص'1 
TaATIAT‏ 


کود: 


name = "TafTaf" 


myText = "I'm name" 


Mid (myText, 5) = name 


ك مت اقا ال م لمحد لاض و ودرك الر واا 
سد علا السار اة فى مكان الجرء الفح فت 

lIلدÃl strReverse‏ تعيد السلسلة وم ذإاء معكوسة 
آ نق من الد وت من الا افر عو کے الال 
التالي ستحتوي على العبارة : مص0عآمس 

کود: 


1 myTexlL = strReverse ("welcome™) 


mM 
5 


شرج وعظو الدوال البرمجية الموجودة في الفيجوال بيسك 


الدالة ءء1aم٥R‏ : وتقوم باستبدال النص 2ع,۲1)ء بالنص 

3اا tءضمن‏ السلسلة 1عد اء » أي أنها تبحث فبالنص 1ع, ايء كود: 
عن النص StrIng2‏ وعندما تجده فانها تحذفه منه وتضع مکانه MsgBox: ASeow ("SF")‏ 
3ء ويمكن تحديد نقطة بداية البحث بالوسيطة ۲ءء وعدد 

مرات الاستبدال القصوى بالوسيطة tمںهءء‏ ضع القيمة -1 لاستبدال إلدالة سبط : وهي عكس الدالة ر تعيد الحرف الممثل لهذه 


وصطفی إسماعيل 


الكلء وطريقة المقارنة compare E‏ ي القيمة فى الترميز ملهء1م ل وتأخذ الصورة التالية. 

Everyone : 

MSGTEOX CHEW (LSS) کود:‎ 
My TEXTE Rep Lacê (FWELCOMê EVEEYORNE;", 


توضيح أكثر للدوال الأربع : 
کود: 
JIدAllI Format‏ : وتقوم هذه الدالة بتنسيق رقم أو سلسلة حروف Private Sub Commandl CLICK‏ 


WELCOME, FIL, LL; =1) 


أو التاريخ/الوقت الموجود في التعبير تبعا لتعليمات التنسيق الموجودة e‏ 
2 ا MsgBox AscW ("a" n‏ 
في الدالة نفسها . وتأخذ الصورة التالية: a‏ 


MSsGBOS CHEWOLSTO) کود:‎ 
EDO SUD 


myDate = Format (Date, "dd-mmm-yyyy"”) 


LECMYDALCEL LEST = DVUDaALCE 
وتعمل هذه الدالة علي تکرار الحرف المار‎ : SELIG الدالہه‎ 


الدالة ١۲٠۳"‏ : تقوم هذه الدالة بحذف الفراغات الموجودة في الجهة ليها وناجذ الصورة التالية. 


السر ئ و النمتى من اة و داخ الصورة الكاة: کود: 
کود: mMISCEIRNG  CLEIRNGOLO, FIS)‏ 
MSGEOX. MYSEELIG‏ 
myText = Trim("™ TEELIaAL "(‏ 
txt rara .Text = myText‏ | هناعملنا علي تکرار حرف ۲ عشر مرات. 
کود: 


ا NTT ooo‏ " 
الدالة R٣1۳‏ : تقوم هذه بحذف الفراغات الموجودة في )13 ,2( myString = String‏ 


SS = "Welcome To V.B World" & myString & الجهة اليمني من سلسلة وتاخذ الصورة التالية:‎ 
NE LOONE 1O VLE WoC" کود:‎ 
MSOBOX 55 


MVTEST & RIFIM(TTALTAT "(‏ 
e.‏ 0 وفي هذا المثال عملنا علي تكرار الضر علي مفتاح الإدخال والذدي 
a ۸ ST‏ 


کود: 3. دوال الوقت و النlاریخذ .Date and Time‏ 
mMyIexl = LIEIM(™ TafTaf ")‏ 
الدالة ٥‏ : تعيد هذه الدالة تاريخ اليوم و الوقت الحالي باستخدام 
الدالة هءءدم5 : وتقوم هذه الدالة سلسلة فراغات محدده بالعدد ساعة الحاسب الذي تعمل علية وتكون بالصورة التالية: 
او ون ا کود: 
کود: 


lblTodayDateHour.Caption = Now ()‏ 
MVIEKLE PIM FF SDC 2) FE FTI TTT‏ 
الدالة 110٥‏ : تعيد هذه الدالة الوقت الحالي حسب ما هو مدون 
الدالة م٣٥١٥‏ 51 : تقارن سلسلتين لتحدد هل هما متساويتين ثم تعيد بساعة الحاسب الذي تعمل علية وتكون بالصورة التالية 
رقا اة لار ت و ك الحو رة الع اة کو 
کود: 


l1lblTodayHour.Caption = Time ()‏ 
MYLIERNE. = SGEFCOMOTTAETAE TT, IQAELIAE")‏ 
الدالة <٤٠‏ : تعيد التاريخ الحالي حسب ما هو مسجل بالحاسب 
الدالة سء5ح : وهي عكس الدالة ءو فالدالة ويكون بالصورة التالية. 


9 ۰ رک کرد اریز النل إن الترمیز ‏ کو 
e‏ 10م ل€وتأخذ الصورة التالية: 


vbaêarah.rformî 


lblTodayDate.Caption = Date () 


الدالة رةد والدالة طادصه" : تعيد الدالة () رحد رقما يقع بين 
1 311 يمثل ترتيب اليوم المقابل لقيمة تاريخية بينما تعيد الدالة 

() ادم رقما يقع بين 1 › 12 يمثل ترتيب الشهر المقابل لقيمة 
تاريخية 


کود: 


l1lblTodayDaylndex.Caption = Day (Date () ) 
lblTodayMonthIndex.Caption = Month (Date () ) 


الدالة 1a1إهء؟>ء‏ هط : تعيد هذه الدالة التاريخ المسلسل المقابل 
لليوم وا أشهر والسنة المدون بين الأقو اس وتأخذ الصورة التالية: 
کود: 


myDate=DateSerial (2003, 4,11) 
MsgBox myDate 


الدالة a1ة1إهء؟ءص۲1‏ : تعيد هذه الدالة الوقت المسلسل المقابل 
کود: 


myTime=TimeSerial (12,59,20) 
MsgBox myTime 


الدالة ء ۷10٠ءا(‏ : تعيد هذه الدالة التاريخ المقابل لتعبير 


کود: 


relVal = DateValue (Now = 1) 
MsgBox relVal 
Select Case relVal 
Case Is < Int (Now): 
Case Is > Int (Now): 
Case Else: 
End Select 
whatDay = Format (relVal, "dddd”) 
MsgBox userDate & verb & whatDay 


TES HLT 


verb = "ijùgكaw"‎ 
verb = ۳ل هو"‎ 


يبين هذا المتال تحديد يوم من آيام الأسبوع (أمس) بعد تحديد قيمة 
تاريخ اليوم (بفرض: الاثنين الموافق 2 سنة 1997) ثم طرح (1) منة 
يظهر الناتج في صورة رسالة يان امس "کان الأحد. 


: Hour,Minute, Second, TimeValue JIgد‎ 
کود:‎ 


HOUFE 6ة(‎ j) 
Minü Eê ( )رة‎ 
S€6CONd ( (رقۃ‎ 
TimeValue (jug) 


تعيد هذه الدوال قيم الساعة › الدقيقة › الثانية أو الوقت. 
کود: 


MLCANLGRE TIMEVALUE ZS 9959) 

MOUELDLEE Hour (midnight) - Hour (Now) 
minuteDiff = Minute (midnight) - Minute (Now) 
secondDiff = SCORN (MIQARILONE) . 
Second (Now) +1 


vwbaêarah.rormî 


مجلۃ سهرية مجانيةۃ تصدر عن موقع قيجوال بيسك للعرب 


شرج معظو الدوال البرمجية الموجودة في الفيجوال بيسك 


l1lbl1WeekdayIndex.Caption = Year (#1/4/97¥#) 


If Second Diff = 60 Then 
MLRNULCEDITLE = MINUCEDILTETL 
SECORODLTEE 0 

ERG LE 

TE MINULGULIT = 6U. Then 
HOUEDILETE =‘ ROUEDITTEL 
MLRULEDILTE = 0O 

ERO LL 

LOCA LMINDLTET 

MLHUEEDLTEE 

LOLA LSOCDITT 

SECOND LEE 

الوك "اااي عا ماف ااا * 2 ب 

ga” & Format (Total SecDiff, “"#,##0”) 

MEG 2 EG CN Ea mY 

MSG < MSG €. HOUEDILE G&G FF ساعة»‎ & 

MINULEDITE 


(MOUEUDTET + 


= (totalMinDiff + 


إ مالي 


secondDiff & 


MsgBox msg 


يستخدم هذا المثال الدوال السابقة لتحويل الوقت المتبقي علي منتصف 

الليل إلى ثواني ثم ترجمة هذا الوقت إلى ساعات ودقائق وثواني في 

رسالة كهذه " إجمالي الوقت المتبقي علي منتصف الليل 

Elog TI lC SO O o 

IY 2D ALS 

الدالة رةك "٠٠١K‏ : عيد هذه الدالة ترتيب اليوم بين ايام الاسبوع 

من التاريخ المدون بحقل التاريخ أو القيمة التاريخية باعتبار أن يوم 

الأحد رقم 1 والاثنين 2 ... وهكذا 

کود: 

lblweekdaylIndex.Captlion = 
Weekday (#1/4/97¥#) 

JIدIلA Year‏ : تعيد هذه الدالة رقما يعبر عن السنة لتاريخ معين. 


کود: 
الدالة ٠2۵١‏ < : تعيد هذه الدالة تاريخ جديد بعد أن تضيف له 
قيمة جديدة وبصرف عن اسم هذه الدالة فهي تعمل مع كل من التاريخ 
و الوقت . ويوضح الجدول التالي المقصود بالمعامل "الفاصل الزمني 


lblDateAddResult.Captlion = 
DateAdd (FYFYVV";, =10; Date) 


سرح وعظم الدوال البرمجية الموجودة في الفيجوال بيسك 


بينما المثال التالي يحدد عدد الأسابيع وعدد الأيام ما بين أول أيام سنة 2003 وتاريخ اليوم 
کود: 


l1lblWeeksDateDiffResult.Caption = DateDiff ("ww", #4/5/2003#, Now ()) 


1bl1DaysDiffResult.Caption = DateDiff ("y", #4/10/2003#, Now ()) 


الدالة ٠٣٣‏ ۶٠2د(‏ : تقوم هذه الدالة بإعادة جزء من التاريخ (مثل اليوم أو الشهر أو الأسبوع أو الساعة) ويتم تعين هذا الجزء بواسطة 
الفاصل الز ملين 

تعيد الدالة في هذا المثال رقم اليوم المحدد في حقل تاريخ الاعتماد) (OrderDate‏ 

کود: 


lbl1DayDatePart.Captlion = DatePart ("w", OrderDate) 


اخترنا لك من وكتبةۃ السشفرات ... 


كيفيۃ معرفة حالة الاتصال بشيكة الانترنت 


Private Declare Function InternetGetConnectedState Lib "wininet.dll" _ 
(ByVal lpdwFlags As Long, ByVal dwReserved As Long) As Long 


Function IsConnected() As Boolean 
IsConnected = CBool (InternetGetConnectedState (ByVal 0&, 0)) 
End Function 


Private Sub Command1_Click () 
LE decConnNecLéd Theêîi 
MSGEOS él a "اة ان‎ 
Else 
MSGEO: ON E a OE OT 
EO TE 
ENC SUG 


"APT J ANS 

Private Declare Function SetVolumelLabel Lib "kernel32" Alias _ 
"SetVolumeLabelA" (ByVal lpRootPathName As String, 
ByVal lpVolumeName As String) As Boolean 


On Error Resume Next 


Dim IsChanged As Boolean 
IsChanged = SetVolumeLlLabel (“c:\”, New Name”) 


vb4arab.cor 


مجلۃ سهرية مجانيةۃ تصدر عن موقع قيجوال بيسك للعرب 


بسم الله الرحمن الرحيم 
السلام عليكم و رحمة الله وبركاته. 
في هذه الحلقة من حلقات السلسة الذهبية في المواضيع 


العلمية سنتعرف بإذن الله تعالى على طريقة تمرير البارمترات إلى 
داخل برنامج من برامج الويندوز! 


تمرير الباميترات إلى أي إجراء تقوم بتصميمه فمتلاً إذا افترضنا انك 
تريد أن تقوم بإنشاء إجراء بسيط وظيفته عرض رسالة معينة يتم 


تمريرها إلى الإجراء .. 
من الطبيعي أن تكتب كود کالتالی: 
کود: 


Sub. myMsGg (BYVAL Text As SIEING) 
MSGEBOX TexTL 
Eid SUS 


و لكي تستدعي الإجراء السابق ينبغي أن تقوم بتمرير النص الذي تريد 


myMsg "Welcome Brothers" 


تجربتنا السابقة كانت جميلة للغاية 
قليلا: 

1. قم بفتح مشروع جدید 

2. من القائمة ct‏ ع0jثٍ۴‏ أختر lئبiد Remove Form]‏ 
3. من القائمة ع زهإ۴ أيضاً أختر البند Add Module‏ 
4. في الموديول الجديد قم بكتابة الكود التالي: 


... دعنا الآن نغيير تلك التجربة 


کود: 
Sub Main ()‏ 
Msgbox Command‏ 
En Sub‏ 


5. من القائمة م۴ قم بترجمة المشروع بإسم ع×ع.yMsgص‏ و 
اه ف الم ال رسن سراف 6 

6. أغلق مشروعك و اتجه إلى قائمة ابد 1 تم اختر منها تشغیل 
Run‏ 

7 أكتب السطر التالي في مربع الحوار ثم انقر على موافق: 


C:\myMsg "Welcome Brothers" 


إذا كتب الله لهذا البرنامج النجاح فإنك سترى مربع حوار يظهر لك فيه 
اللص الذي كتبت4 و .. Welcome Brothers‏ 


ص 


b.coarTî 


مجلۃ سهريةۃ مجانيةۃ تصدر عن موقع قيجوال بيسك للعرب 


vb ÊArFa 


تورير بارميترات إلى داخل البرنامج من الويندوز 


رغید طیب 
و لكن السوال الان هو ها الذى حدث بالضبط ؟! 


المسمى ل,محصصه٣‏ يحتفظ به الفيجوال بيسك لتخزين 
البراميترات التي تم تمريرها إلى برنامجنا .. وما قمنا نحن به هو فقط 
سي .. € تم نقرت على البرنامج ع٥×ع.ع۷s×,رم‏ فانك عندھا ستری 
بإذن الله تعالى مربع حوار فارغ ! ... و السبب هو أن النقر العادي 
على البرنامج لا يمرر له أي بارميترات لكك إذا ذهبت إلى القائمة 
تشغیل ( ں8 ) في ابد ثم كتبت مسار برنامجك کاملاً ثم اتبعته 
بفراغ تم أي نص فأنه سوف يتم تشغيل البرنامج بشكل طبيعي مع 
تمرير النص الذي كتبته إليه عن طريق المتغير 0٥۳٣٣2۵٥‏ و يبقى 
على البرنامج استخدامه بالنحو الذي يروق له 


الفائدة من ذلك ؟ 


قد يسأل سائل عن الفائدة المجناه من تمرير بارميترات ( 
نصية ) إلى داخل البرنامج و هذا سؤال رائع في حد ذاته و الإجابة 
عليه ستعود بفائدة أروع بإذن الله تعالى ! .. حيث أن ذلك يفيدك في 
تخصيص طريقة تشغيل برنامجك بحيث يعمل البرنامج بأكثر من 
صيغة اعتمادا على البرامتير الممر إليه و يعتمد الويندوز على هذا 
Sa‏ المبدأ و 
سيكون من المفيد للك أيضا من أن تتعرف عليه وتستلغه في برامجك 
المستقبلية إن شاء الله تعالى. 


دعنا نضصسرب أهثلة ! 


تنفيذه وهذا شي جميل ... غير انك إذا قمت بالنقر على أي ملف 
بإمتداد تابع للورد ( 50٥.‏ ) فأن الذي سيحدث حينها أن الوورد سوف 
اک رن مع تقل المت الى ار و هه ان کات 


إذا كنت معي في ما سبق فاأعلم أخي أن الذي حدث هو أن الويندوز 

فى المرة الأولى قام بتشغيل الوورد دون تمرير أي بارميترات لأناك 
قد نقرت عليه مباشرة و لكنك في المرة الثانية نقرت على ملف تابع 
للورد فقام نظام التشغيل بتنفيذ برنامج الوورد و لكن مع تمرير أسم 
الملف الذي نقرت عليه نت وقام بتخزينه في المتغير ل۳120٥ہ°C‏ 
... و هنا يجب أن تفهم أن المبرمجين ( أمثالك عزيزي ) الذين 
صمموا الوورد قاموا بعمل فحص بسيط للمتغير ل21 C٥0١۳‏ عند 
تشغيل الورد بحيث يتم التأكد من انه لا يحمل أي قيمة ممررة ) أسم 
ملف ) فان كان يحمل قيمة يتم عندها فتح الملف الذي ثم تمرير أسمه. 


و إن كنت مهتما بموضوع ارتباطات الملفات وكيف تصنع ارتباط 
خاص ببرنامجك فلعل الرابط التالي أن يكون مفيدا 


http://www.vb4arab.com/vb/showthread.php?t=9 
الوزيد من الذوثلۂ‎ 


أن القيم الممررة للبرنامج مفيدة أكثر مما قد تتصور لهذا أسمح لي أن 
ا TE RET‏ 


بكثابة التالي: و 


کود: 


تورير بارميترات إلى داخل البرنامجح من الويندوز 


رغید طیب 


Shell "éxblorer .éxé", VbNOoOrmalFocus‏ سيقوم السطر السابق بفتح الاکسبلورر مع تحديد الملف الممر بعد 


طبعاً هذا برنامج المستكشف اسمه Explorer.exe‏ ولأنه من 
ملفات النظام فلم نضطر إلى كتابة مساره كاملا و اكتفينا باسمه فقط 
و لأنني سأفترض انك كنت مركز على كلامي السابق و استوعبت 
معطم فت ت نشل اله أن الكرد الساى كام ل برا اا 
e.e×eإ0اpم×ء‏ دون أن يمرر أليه أي بارميترات ( لان التمرير 
يكون بوضع فراغ بعد اسم البرنامج تم النص المراد تمريره كما عملنا 
مع عبارة Welcome Borthers‏ في السابق ) ... و الأن إذا جربت 
اسقذال الكرة السابق بالسطر التالى- 


کود: 


Shell "explorer.exe /e,C:\", vbNormalFocus 


إذا جرت الأمور بشكل سليم فان الذي سيحدث أن المستكشف سوف 
يفتح و لكن التركيز سوف يكون على السواقة سي ( € عD)iv‏ ) و 
السبب في ذلك يعود إلى أننا قد قمنا بتمرير البراميتر "۱:٥"‏ بعد اسم 
البرنامج ... فالجزء /م یرمز اختصاراً ل عإ0[م ٤×‏ ومعناہ ( قم 
بتصفح ( تم تأتي الفاصلة بعد ذلك تم الدرايف سي ( ۱:٣‏ ) و معناه قم 
بتصفح الدرايف € وإذا أردت متلا أن تتصفح الدرايف 5D‏ اكتب 
السطر: 


کود: 


Shell "explorer.exe /e,D:\", vbNormalFocus 


بتمرير الرمز /ع و الذي يعرفه ال orerاExp‏ على انه أمر بالتصفح 
لك اة ار اة ا ا ا او که 


اللي 
کود: 


Shell "explorer.exe /e,C:\Windows", 
VONGOEMALEFOCUS 


وماسبق يعني أن متصفح الويندوز يفحص البارمترات الممررة إليه 
للتاكد من نوع العرض المطلوب تم يقوم بطريقة العرض المناسبة 


بحسب طلبك أنت 


الوزيد عن الوتصفح... 


قبل أن انتقل إلى أمثلة أخرى قدرت انه ربما يكون من المفيد أن تعلم 
متلا أن هناك العديد من البراميترات الممكن تمريرها إلى البرنامج 
وعليك البحث لمعرفة البرامترات التي يتقبلها كل برنامج لان الأمر 
ليس محدداً و يتوقف على المبرمج نفسه فلكل برنامج بارمتراته 
الخاصة ... ومن المفيد أيضا أن تعرف أن مبرمج الإكسبلورر قام 
بجعله يفحص بارميتر آخر اسمه {ءع1م؟ للتأكد من انك ترید تحديد 
ملف معن مذ خد المثال الط اللي 


‘7? 


a b.carTî 


مجلۃ سهريةۃ مجانيةۃ تصدر عن موقع قيجوال بيسك للعرب 


کود: 
Shell "explorer.exe‏ 
/Sêlecty, CIX\Autoéxec. bat",‏ 
vbNormalF'ocus‏ 


آ4 


البراميتر )ءع[ع5 وهو في حالتنا هذه الئمذف ... C:\Autoexec. bat‏ 
و متلا لتحديد الملف 1م1.م1 ۷ الموجود في مجلد الويندوز يمكن كتابة 
التالي: 


کود: 


Shell "explorer.exe 
{SELECE, CE WIR OVE IG.IDNLT", TFENOEMALEFOCUS 


إلى برامح أخرى.. 
ع الف ار کن اا کک اقل 


کود: 
لا يخفى على أحد أن هذا سوف يشغل برنامج المفكرة... و لكي نقوم 
بتشغيل ملفات باستخدام المفكرة مباشرة اكتب مثلاً: 


کود: 


Shell "Notepad.exe C:\Autoexec.bat", 
vbNormalF'ocus 


Gg TT TT 
مباشرة لأننا قمنا بتمريره للمفكرة كبراميتر‎ Autoexec.ۆbat‎ 
وإذا كنت قد فكرت يوما بفتح لوحة التحكم بالكود فيكفيك أن تعرف أن‎ 
Control.exe لوحة التحكم ما هي إلا عبارة عن برنامج اسمه‎ 
وبالتالي لتشغيله اكتب:‎ 

کود: 

و لان لوحة التحكم تتعامل مع ملفات ذوات اللاحقة ام فيمكنك إذا 
تجريب السطر التالي: 


کود: 


Shell "Control.exe Desk.Cpl", 
VONOEMALEOCUS 
الذي يتم فتحه بواسطة لوحة التحكم‎ g Desk.cpl المسؤول عنها هو‎ 
(کما عرفنا قبل قلیل...)‎ Contr01.exe او ال‎ Contro1 Panel 


دعنا نرجع الى الوراء قليلا... 


بعيدا عن برامج الويندوز و بالعودة إلى العهد القديم للدوز فأن المبدأ 
نفسه کان ولازال موجوداً فعندما تكتب فى محث الدوز الأمر [1S‏ 
فان الشاشة التي أمامك سوف يتم تصفيتها لأنه الأمر الخاص بمسح 
الشاشة في الدوز و إذا قمت بكتابة أي أمر بعد هذا الأمر فان الناتج 


CLS Rgheed Altaib 


فلن تؤثر العبارة طإه)ا۸ 4٥٥1ع R‏ على الأمر بشيء لأنه ببساطة 
يتجاهل البارمترات الممررة إليه أما إذا كتبت الأمر 


١ Dir 
A" 


E O E CN E 
ليصبح كالتالي:‎ 1R صياغة الأمر‎ 


DIR /0:-n 


أن النتائج الظاهرة أمامك هي بترتيب تنازلي لأن 
البراميتر 0 يرمز للترتيب ( إملإ0 ) و الحرف م يعني تصاعدي 
وأما إذا سبقتها بعلامة سالبة فيعني ذلك عكس الترتيب 
وكذلك الأمر إذا كتبت: 


فانك سوف تری 


DIR /a:h 


هذا الأمر سوف يعرض جميع الملفات المخفية لك الآن الحرف ج 
اختصار Attribute ) J‏ ( و ال تى صفة الملف و الحرف ط 
يرمز للملفات المخفية ولل¡ H‏ 


وينطبق المبدأ على باقي أوامر الدوز و التي ليست إلا برامج عادية لا 
تختلف عن برامجنا في الفيجوال إلا بأنها خاصة ببيئة الدوز ... ولذا 
فينبغي عليك عندما ترى أمر مثل: 


DEL C:\myFile.txt 

انت تفهم بوضوح أن الامر ٤1‏ ما هو إلا برنامج خاص بالدوز و 

ان اسم الملف ۴1٥.»‏ رص]:ء ما هو إلا بارمیتر ممرر إلى البرنامج 
DEL‏ 


Êl 


كما سبق أن قلنا أن العديد من البرامج تضع لنفسها 
بارمتيرات معينة لتفحصها عند الإقلاع و على أساسها تحدد نوع 
العرض أو العمل الذي ستنتهجه فلو انك اطلعت على موضوع شاشات 
التو قف الذي ناقشه الإخوة » فستعرف ل شاشة التوقف ععإ›S؟S‏ ) 
( ما هي إلا برامج يمكن أن تكييف نفسها للعرض بأكثر من 
ظطر واڪ اعم عل لار مات الى بفرر ها لها طا ااال 


ودعني اضرب مثالا أكثر بساطة... فلو انك مدمن ماسنجر 
فلربما كنت قد جعلت الماسنجر (۲عg”ع‌ssمM )MSN‏ يعمل بمجرد 
تشغيل الويندوز وسوف وينبغي أن تعرف كيف استطاع الماسنجر أن 
يفرق بين نقرك العادي عليه ( وعندها يفتح مباشرة ) و بين تشغيله 
عند الإقلاع وعندها يمكث في الخلفية ويظهر فقط رمزه بجوار الساعة 


دون أن يز عجك ؟ . .. لكي تعرف السبب قم بالتأكد من البرامج الى 
تعمل عند تشغیل جهاز ك ) اکتب msconfig‏ في القائمة تشغيل و 
اذهب إلى آخر بند pں٤اھSt‏ ). 


الجهاز ابحث عن الماسنجر mSnmMSEr‏ وانظر الى المسار المكتوب! 
/ckg0un0هط‏ يعرف من خلاله الماسنجر انك ترید تشغيله في 
الخلفية دون از عاج المستخدم... 


۰ ا ۶ 4 


vw bê ara b.rorm 


تمرير بارميترات إلى داخل البرنامح من الويندوز 


رغید طيبا 
لماذا لا نقوم نحن بالتجربة ؟ 
NT‏ 


myMsg‏ ي I"‏ قدا لر غذلناه تلاا 


كي يصبح أكثر فائدة... قم فقط بتعديل الكود الذي فيه من: 
کود: 
Sub Main ()‏ 
MsgBox Command‏ 
ERQ. Sub‏ 
ليصبح بالشكل التالي: 


Sub Main () 


CLLDDOAEA:. CLEaE 
Clipboard. SetText Command 
End. Sub 
التعديل الذي قمت به أنا هنا هو فقط تصفية محتويات‎ 


الحافظة (ذاكرة الويندوز) قمت بنسخ محتويات المتغير 
n4هصص0‏ (الذي يحتوي على البارمترات الممررة للبرنامج ) 
إليها و الأن قم بترجمة هذا المشروع إلى ملف م×م و اجعل اسمه 
yPathرmص‏ وضعه في المجلد الرئيسي |:- 


E N 
مع جميع الملفات ... لتسهيل العملية عليك افتح مشروع جديد وضع‎ 
الكود التالي في زر أمر ونفده.‎ 


کود: 


Private Sub Command1_Click () 
Dim shl As Object 
shl = CreateObject ("Wscript.Shell") 


SRL. FEOWELCSE TARE Soo ma 
LLI EoOMmaRNnON "yy. TC: \mMyPalh. xé SIT" 
ENQA Sub 


الكود السابق سوف يسهل عليك بفضل الله تعالى تعديل الريجستري 
يدوياً. 

و الان إذا كنت قد التزمت باسم البرنامج myPath. exe‏ وكذلك 
مساره في السواقة سي . .. فيمكنك أن تذهب إلى أي ملف في الويندوز 
ثم تنقر عليه بالزر الأيمن وسوف تجد أن أمرا جديداً قد انضاف إلى 
القائمة باذن الله تعالى . .. اسمه ( مسار الملف ) قم بالنقر عليه وسوف 
يخزن مسار الملف الحالي في الذاكرة بحيث يمكن أن تلصقه بعد ذلك 
مباشرة في أي برنامج للاستفادة منه . .. و بهذا نكون قد عرفنا طريقة 
س ام اوا ا ایت نے دا 


قبل أن أتركك عزیزی ! 


بالفعل بدأت اشعر ببعض الإرهاق غير أني أحب قبل أن اذهب أن 
اضرب لك مثال أخير ربما كان مفيدا لتثبيت الفكرة.... لنفترض انك 
تريد أن تعمل برنامج لا يمكن للمستخدم أن يشغله مباشرة عن طريق 
النقر عليه و تريد أن تقوم أنت فقط بفتحه عن طريق تمرير كلمة 


» ک أتشغبا 

لتنفيذ شيء مشابه قم بف بفتح مشروع جدید و صمم الواجهة التي ټريدها 

لبرنامج ثم اکتب الكود الكالى في الحدث )04 1 للفور.: i‏ 1 
a‏ 


5 
E 
لے‎ 


تورير بارميترات إلى داخل البرنامج من الويندوز 
کود: 


Private Sub Form_Load () 
lf Command <> "Bye Rgheed" Then 
ENC 


EN LL 
ENQA Sub 


والان ترجم المشروع إلى ملف تنفيذي ولیكکن Project1. exe‏ ق أي مکان ولیكکن السواقة سي للاختصار . C8‏ الان جرب أن تفتح 
البرنامج فلن يکون Ss‏ ذأاک أبدا لأنه التالى :لفحص للتأكد من البارميتر تر الممر أه فان کان مساویا للعبارة "Bye Reheed"‏ فسوف يفتح 
بإذن الله ... ولكي تفتح البرنامج اذهب إلى القائمة تشغيل ون8 واكتب السطر التالي: 

C:\Project1.exe Bye Rgheed 


أو عن طريق برنامج فيجوال اكتب السطر التالي: 
کود: 
و حينها فقط سيعمل البرنامج بإذن الله تعالى 
أخيرا أتمنى للجميع تحقيق الفائدة المرجوة 


السلام عليكم و رحمة الله و بركاته 
اکآ بن كت اک , 


00۲٣ للجمیع, نحو برہجۃۂ کائنیۃ التوجہ‎ ۷ isuaا‎ Basic 
صورة غلاف الكتاب؛ بعض المحتويات‎ 


المقدمة 
- الجزء الأول :الأساسيات - الفصل الرابع :مکتبات ۷8 و ۷8۸ 
- الفصل الأول :تعرف على اوuو¡۷‏ التعامل مع الأعداد 
Basic‏ التعامل مع الحروف 
بيئة التطوير المتكاملة 1(۴ التعامل مع الوقت والتاريخ 
كتابة برنامجك الأول التعامل مع الملفات والمجلدات 
- الفصل الثانى ٠‏ النماد & ال کائنات أخرى 
الخصائص المشتركة اكتشاف الأخطاء 
CM NI E‏ 
اللغة :عربية اا ا OOP‏ 
المؤلف: الأستاذ تركي العسيري نافذة النموذج مقدمة الى 00۶ 
نوع aûlلف: ZIPed PDF‏ الأدوات الداخلية بناء الفئات 
حجم الملف: 1.05 ميغا بايت - الفصل الثالث :لغة البرمجة٣ 8۸91‏ استخدام الكائنات 
تاريخ النشر :2002 المتغيرات والتوابت - الفصل السادس ,تعدد الواجهات والوراثة 
علد الصفحات:200 التركيبات والمصفوفات تعدد الواجهات Polymorphism‏ 
المستوى :مبتدا الإجراءات والدوال الورlڎ Inheritance‏ 
لتنزيل الكتاب اضغط هنا التحكم في سير البرنامج الأهرام الكائنية 
تحسين الأكفاءة 


0 
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إني ذكرتك والذكرى مورقہ 4/1 


سلسلة من المقالات. أحاول فيها تحفيز مبرمجي أم1اءئ۷ 
0.× 21ط العرب إلى مواكبة التيار والهجرة بلا عودة إلى احد 
لغاٽ إطڙطار NET Framework. Jac‏ 


تمر على الإنسان لحظات الاشتياق إلى الماضي والإبحار بالنفس 
E NG‏ 
نى فما قاذ ع الطينء مع الاسضاع إلى الحان القراقم. 


أن كان الأغلب منا ينظر إلى الورد في ماضيه»ء فانا أفضل رؤية 
الشوك مع لغات البرمجةء ومن منطلق خصالي البرمجية فأفضل أن 
أكون خائنا لها وأحاول إظهار الوجه الآخر عندما أهاجرها. (لقد 
هاجرت الكثير منها في حياتي» فلم يعد القلب يخفق لأحد) 


وبما أني هجرت إلى 1 V¡sua1 Basic.NNE‏ » فسأحاول ما بوسعي 
ارزع الجرارات والانيرات إل اخرتي أغاء .رررار 
arab .co×‏ yb4حتى‏ يسيروا مع الركب وينطلقوا إلى ما هو الأفضل 
لهم ولأعمالهم حيث أن استمرار نشاط المنتدى تحت راية Visual‏ 
Baslc 6‏ الذي یطغی فلن نشاط منتدی احم احم أقصد قسم 
Basic .NET‏ Visua1أمر‏ لا أرى فيه مصلحة لا للمنتدى ولا 
لزواره. 


من هنا سنحاول (بعد إذن إدارة المنتدى) شن حملة ضد إجuئ¡۷‏ 

6 »یه8 وإظهار عيوبه لتكون حافز إلى المبرمجين العرب للانتقال 
إلى Basic .NE 1T‏ اVİsua‏ ۰ ومن بعد ما کنت من اشد عشاق 
Bi‏ ua1ء۷»‏ سأريكم الوجه الأخر لأصبح عدوه اللدود. فالإخوان 
الذین لا يزالون يرفضون الانتقال إلى as¡c.NN£1ےB ¡sua‏ › لابد 
من محاولة تغيير قناعاتهم. اعلم انه يعز عليكم فراق الحبيبة إهuائ¡۷‏ 
si‏ » ولكن لما لا تحاولوا إضافة الحروف N۴1.‏ عليها؟ 


لغة البرمجة 0.× یج8 u21ء۷1»‏ قمت بترجمته بتصرف» والقادم 
في الطريق. 


Visua1 BAC‏ المتمرسین. 


المقال: ترجھمہۂہ خاصہ ب 


شاركت المبرمجة "فيرتي ستوب" في احد المشاريع بلغة إهuئ¡۷‏ 
Bs.‏ ومن أجل الفئات والأجيال القادمة من مبرمجي [هuائ¡۷‏ 
‘Bas1Cc‏ قررت كتابة ملخص لتجربتها - غير السارة - كفائدة لهم. 
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وجلۃ سمرية مجانيةۃ تصدر عن ووقع قيجوال بيسك للعرب 


u آ4‎ 


تٽرڪي العسيرىي 
1. استدعاء الإجراعاٽت وlلدJlIg Procedure and‏ 
function calls‏ 


مع بدایات ظهور لغة ال٥B8A۸5S1‏ » واجهنا الكلمة المحجوزة 
8 لاستدعاء جزء معين من الشفرة (يرمز له برقم أو اسم)» 
ولكن مع ٥1و8‏ اعںء۷1 فقد اظهر لنا نوعين من الإجراءات هما ال 
Ss‏ (والتي لا تعود بقيمة) › وال ٣s‏ ه1ذعاعءصنں" (التي تعود 


إجراء اتد اء 5ن6 `' 


Paramz2 


Subname Paraml, 


' FuUDNCEILoRN ln AIS 
Result = FuncName (Paranml, 


Param2) 


النوع Sub‏ لا یمکنك استخدام الأقواس معها. 


کود: 
عطا ومهالة ستدهر `" 

Subname (Paraml, Param2) 
حتى لو لم تستفد من القيمة التي تعود بها الدالة:‎ ٣u اع‎ 101 - 
کود:‎ 

FuncName (Paraml, Param2) 
أن قمت باستدعاء دالة بالطريقة السابقة ( بإضافة الأقواس ودون‎ 
الاستفادة من القيمة التي تعود بها)» فسيتم التعامل مع الوسيطات‎ 
و 2 ھ۴٥ كما لو أنها أرسلت بالقيمة 1ح۷رم‎ P٥٣۵1 المرسلة‎ 
By R٥۴ ! حتی لو تم تعریفھا علی آنھا بالمرجع‎ 


ولكکن i‏ استخدام الكلمة المحجوزة Cal‏ (لم ارف أي مبرمج 
¡ئB‏ |اuaء۷1يستخدمها‏ في حياتي) فسيتم إرسال الوسيطات 


: By Re f بالمر جع‎ 
کود:‎ 

Call FuncName (Paraml, Param2) 
Variable التصريد عن المتفيرات‎ .2 
Declaration 


يمكنك أن تصرح عن متغير كما هو معلوم- باستخدام 
الكلمة المحجرزة: 5051٣"‏ 


کود: 


Dim I1I As Integer 


المبرمجون المتمرسون يفضلون تعريف الأنواع المتشابهة في سطر 


واحد: 


کود: 


0 lL J, K, L As Integer 
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حه رلت منك هه افر فخ الر ات اسا فن الت تركي العسيري 
Variant‏ ما عدا الأخير ,1 فهو الوحيد من النوع Arrays of constants ٽılgڌll Aۃgژۋصn, .&8 .1Integer‏ 


لايوجد شيء في یه8 21 ںء۷1 اسمه مصفوفة الثوابت. 
3. استدعاء دالة أو استخدام مصفوفة ۸١٥1أ٤‏ ۸لا ج اأاة) على اية حال» ماذا ستفعل بها حتى لو كانت موجودة؟ --- مبرمج 
1 إ۷ تفکیر آک 1١‏ 
¡sua B1 Tor access an array‏ تفگيرك محدود! ! 
ف اغلب لغات البرمجةء يمكنك التفريق بين عملية استدعاء 9. النوع إntegerہnا‏ حجوnہ‏ 16 The type û‏ 
الدالة ۴ التي ترسل لها القيمة 3» وبين الوصول الى المصفوفة F۴‏ برقم Integer declares a 16-bit İiN(€g€r],‏ 
الفهرس ۰)3 فالأولی قد تکتب (۳)3 والثانية [۴]3› ولكن مع 1جuائ¡۷‏ 


a‏ كن العا الا اة خا وک اه 
Basic‏ فکلا الحالتین تکتب (۴)3 ! تكون العبارة السابقة مقبولة بكل رحابةء ولكن 


الحديث عن نظم 32 بت (والتي بدأها نظام التشغيل95 sس0لہ¡W)‏ 

"ملاحظة: حتى Basic .N81‏ |[uaو¡V‏ لم يغير هذه العادة" 0٠‏ فلغات البرمجة الاخرى قد لاحظت التغيير! 

Another thing about ٽlفêوفیصولا شیء اخر حول‎ .4 

10. الونطق ٥091ا‏ 

9 arrays 
يبدأ ترقيم عناصر المصفوفة ب 0 دائماء ولكن عند نقل هذا الجزء الهام من اللغة الذي يفترض ان يكون سهل‎ 


ld ٤‏ وبديهي» هذا اختبار سريع لك: افترض أن 1)ءءط أداة من النوع 
لشفرة إلى جهاز او خر يستخدم الموجه ٥10ام0‏ ×0 ec)8عطC‏ على نافذة النموذج» وقمت بتنفيذ هذه الشفرة: 
›Baَse 1‏ فسيكون 1. 


E ٍِ‏ کود: 
5 ولکن ل لبك هناك الوجووعات ایضصا Dim b As Boolean, c As Boolean But there are‏ 


bG: = CheckEL. VaLuE also collections 


GS NOE CHECEL.VSLUG 
التصميم الكائني التوجه 00۲ لا يخلو من المجموعات‎ 
والتي يبدأ ترقيمها في العادة من 1ء رغم انه في حالات قد تبداً ترقيم فالمتغير ط السابق ستکون قیمتهھ مں1۲ إذا قام المستخدم بتحديد الأداة‎ 
عناصرها ب 0 أيضاء وذلك يعتمد على المكان التى عرفت فى (لء)ءعط٣ = عمعuاج۷)» والقيمة مء[ه۴ إن قام بإلغاء التحديد‎ 
ماذا تعتقد ستکون قیمة المتغیرہ ؟‎ )Vaاue‎ = Unchecked) ٠ المجموعة. تحتاج إلى ضربة الحظ هذه المرة!‎ 


6. هل لمحت إلى البروجةۃ كائنيةۃ التوجہ | 5i١‏ !!!1 
السید ٥1یج‏ 1ھںء]۷ تحتاج إلى كتاب كامل!!!!) 
Tmention OOP‏ 


مبرمج 1وج8 1هuوء۷1‏ طيب القلب (على النية). 


11. كلوات محجوزة نفس المعاني مختلفة الذغراض 


ا Noth in3‏ تعني لا شيء 
/. إسناد القيم لحظة التصريح |nitializati0٥۸‏ 


1 تعني لا شيء 
في العصور الوسطى للغة ال©8۸81 » حاول مصمموها . ا 
إيجاد حل لمشكلة إسناد القيم لحظة التصريح یږ × مزن لما رام.ع فتعني لا شيء 
‘Integer = 10(‏ وکان کل ما استطاعوا فعله سلوب غبي يعتمد ۳ کک 
غل اللات المحر نة 0۸1١‏ واةاى اا د الاح ار ا ا ع ى و 


¡sua Bi‏ ۷اخترعوا أسلوب أكثر حداثة والذي يكون شيئا مثل: 
خترعوا اسلوب اکثر والدي يکون 2 . محرر الشيفرة الغبي The stupid code editor‏ 


خطأً نحوي وقت التصميم .Design time syntax error‏ وقد 
تظهر .عنما ترك الفظر بی كتا كلم وخدة بتكل موقت وا 
جزء من شفرة مصدرية في سطر أخر. 


Dim A(20) As Double 

الرقيع جوزاحد !ا" وي1 ك )حح 
A(1L) 1‏ 

A(2) 02 

A(3) = 4.92 


ونعم التطور!!!! 
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13 . المترجم الغبي The stupid compiler‏ 


تركي العسيري 


والذي قد يجري عملية ترجمة Compıiling‏ رغم وجود بيعص الأخطاء نحوية» ليظهر خطاً كتابة العبارة TF J TF‏ وو کگخطا 
وقت التنفیذ Run time e0‏ . 


14. عودة الى الإجراعات من النوع طuك؟‏ 


ك من النوع اء یمکن أن تصرح بالكلمة المحجوزة 11ط م؛ ء٤va:ءإء»‏ أو ءزعمtء‏ . أعطيك 100 دولار أن وجدت 
حالة حقيقية تستحق فعلا الاستفادة من تعريف الإجراء باستخدام 1 خم خS‏ 


©5 . الفائدة في النهاية لك يا بيل جيتس 


وأحاول بقصار جهدي لإيقاف أرباحه رغم ا متأکد َ أساعده أيضا!! 


PFubii13 Sub vbéIsAStupidLanguage | | 
lt YoOudireAVSbUDeE 7e lopeErE 

Fzint "If yoü don't migratê tö .Nêt You're A stupid likêë mê" 

End IF 

End S5uiۈۍ‎ 


Erreur de compilation: 
Atterndu: Then oi GOTO 


Aide j 


آآ . ا لفات س س س ف سا س ا 
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مجلة شمرية مجانية تصدر عن موقع فيجوال بيسك العرب 


Programming Games] Tracks 


إذا علمت أن جد سالم توفي سنة 16/72 م» وأن سالم توفي بعد ميلاد جده بمقدار 131 سنة» وإن 


مجموع عمري سالم و جده 105 سنوات» ففي آي ستة و لد سالم... 


يقوم المهتندس خالد ببناء حائط متنزل خلال 4 ساعات عمل متواصلة › بينما يقوم المهندس حامد 
| ببناء نفس الحائط في 6 ساعات متواصلة › فإذا جمعنا المهندس حامد والمهندس خالد فكم من الوقت 


يستغرق بناء الحائط نفسه 95 


نريد شراء 100 طير من الأنواع التالية ب 100 ريال »بحيث سعر الدجاجة الواحدة © ريال » وسعر 


الحمامة الواحدة ریالا ودا وسر 20 عصفورا بريال واحد فقط . فكم عدد الطيور من كل نوع؟ | 


ها عليك إلا أن تستعمل معادلات رياضية بسيطة لتجد الحل. 
الأخطاء السبعة ... 8500S‏ / 


اللعبة بسطة جدا... 

ما عليكك إ۷ أه نراجك الشفرة البرمجية و نشف الأخطاء المنطقية و/أو النحوية الموجدة فيا وهي 7 
أخطاء... ممنوع العش واستعمال به التطوير أو أي مرجم خاص (اللغه.. 

نحاد - الحلقة الأولى - 


نجم الذدوعۂہ الإلکنرونیہ 


فیلیب کاں. موسس شرکہ بورلاند 

داخل مسنشفی للمحانین 

الد كتور للمريض:اسمك إیه؟ المریض: انا ابه نابلیوه بونابرن 

سابه الد کتور وسال هریض ناي مین ده. المہیضښ التانی ٥:‏ ابت نا بلیوه بونایرنت 

الد کتور بص شاف مریض آخر مش مقتنی بالکلام الآخریت فسأله الد کتور: هو ده فعلا ایك نابلوه بونایرن 
الھریض: کراب طبعا ده ۷ أبني و أعرفه. 


وداعاً نتسكيب/القصة الكاملة لعميڈ متصفحات الإنترنت الذي تو إيقافہ 


أطفال قرا = n‏ في ودر ت 


الغخامدي 
في كل يوم كت أسمك فيه عن خسائر بالمليارات سنويا هه محطات مختلفة نتيجة لعمليان الاختراق و القرصنة. 
وينما أنا اكت في أحد المنتديات أتتني خاطرة وهي: 


زكرن أطفال كانوا أيام دراستي التي (لم أتابة بها) ونذكرت فيا أطفال في سرستنا فى سبيل القرصنة 
نعم ببما القرصنة في البرهجي نعني شيء ولکن في «درسني نتعني أشباء أخرى وهي (بما 
على سيل المتال. 

فف أيام الإختبارات الأولية مثل الإملاء والمذاكرانت وغيرها مت الإجراءان التي يتطلبها الطاب لينج< فيها 
كاد كل مرة يأتينا طفل ويحدثنا على ثغرة فى عملية اإختبار 

فحيت نكب إملاء كان يكتبها على الصفحة في منتصف الافتر وحيت نأنى الآنسة ۷ نراها ومنهم مه يكوه قرصاه ذو قررة أعلى 
وهي أه يقوم بكتابة الإملاء على صفحة وضعها فوق صفحة الرفتر أثناء عملية الكتابة ويضغط بالقلم حتى تبقى آثار الكتابة على 
الافتر للغد حن تأتي | الآنسة ونقرأها لنلترها. 

فنلون مته هي أن يعد الكتابة فوة النص الشفاف و يأخذ علاهة جيد جدا... 

ولكن المصة بالمقلديه للفكرة فبأ ترك أطفال أغباء فناني الآنسة ونقرأً وهم يتيوه ولكك لسوء حظهم أن الإنسة ۷ تيا هن 
الأعلى فدکتیو نچا ورظینون از نهم أذکداء (لأنعم ۷ يحدوه القراءة) و| ۰ هي | | لشاف اھر وأخذ علامة أل 0 وضاعت هذه 
الفكرة الذهبية من الأطفال الآخريت لاه برنامج «طهزهآ٣ Ati‏ - أقم الإنسان- التشفتن الحطة وبات ملشوفة وتم اغلاق 
هذه اللغرة بعر طرق. 


وأخيرا نأني للمحة النجا< نعم ... كاه في نهاية كل سنة دراسية يعطونا صفيحة مكتوب بها تقديرنا الفصلى -الرائك- ليشاهده 
أهلي والمصيبة هنا... 

فمت لریه على صفیحته کرنونة سلون كاد كأنه الأول والمصيبة هي بمت لم يأخذ هذه الكرتونة الملونة ويعيب عليه 
أهله عدم تحصله عليها مما دف لظهور "قراصنة الصفائح" وهم أ امنا هه الأطغال 

فيان الأطفال يشنرون هذه الكرتون it re‏ ویتفاخرود أ ما الأطغال بها وبألو انها وبکر حجمها والرهشة كات ۷ 
نفرح أحد أ كدر مت والريه اللزاه يظنان أ ۵ أ دتما سبح طس المستقبل ولم وله وووو وم هذا الى الأحلام 

إل أه نم اكتشاف هذه TT‏ أحد المدرسيت وذلك أيضا لوجود نلميذ غبى أضاف على صفيحته هجموعة هن هذه 
الكارتوه مه أ كيرها حجما حبت نسي هذا الطفل الغبي أه علاهاته ۷ تتناسب مك هذه الكارتوه مما أدى لكشفه وفميحته 
وا كتشف الجهاز الإداري هذه الثغرة وألزم الأدارة بوضك ختم عليها لتا كررها 

نعم یا نری هل کت قرصاه فی صغري ریما 

فحین انوا یعطونا هذه الصفائح اشا ها أ حر أفرار ارتي ویوقعونها کت کل سدهولة أ قل لوقدے والري أو أخرع (وقدے 
وبعض العراران المشحعة للآنسة "شترا لم وعلې بذلکم المجهود الرائے في سبيل إنشاء ولا علمدا ا مهارو" 
وکت أراعي علاماتي فأرفح کلامات التوبیخ في حال كانت علاهاني a SES E‏ 
یندست ولي في درا سنه 

وحيت نأتي للآنسة لتقرأها كانت الإنسة شر عه أسنانها وكأنها وجرت ما يطفن عطشها لستعمال لسانها أو 
..........! ولكتها ۷ نري أني أوقعتها قى الطعم فصقت الطعم بينما أسرني لم نترى قط النتيجة. 
فحيت يسألوني أقول لهما اذهبوا للمدرسة بكل شجاعة فيظنوه أنهم لم يعطوني إياه وينتظروه آخر السنة فيروي النصيب منه أو 
كت أخفده عنهم أيضا 


أ كير هذه الأفعال ربما ملتوية ولكن رما عبر عت طاقه في هولء 
الأطفال ربما سيكونوه مه القراصنة في المستقبل. 


x 
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الأخطاء السبعة ... BU0sS‏ / 
إعداد وليد بوالطمين 
اللعبة بسطه جدا... 
ها عليك إ۷ أده تراجك الشفرة البرهجية و نكتشف الأخطاء المنطقية و/أو النحوية الموج فيها... 
سمنوع الغش واستعمال دة التطوير أو أي مترجم خاص باللغة.. 
انرا . 


عليك أن تعرف أنه عند حساب قو عرد لعرد أخر متلا أ + له شروط يمكنك ااطلاع عليها فى الحل الخاص بهنه الشفرة لك 


قبل ذلك عليك أه تدرب جميك الحالات. كما أه الحل مرفق و يجب أه تطالعه ولكن بعد القبام بالبيى عه الأخطاء 
أو المثال بلخة الس شارب 


کود: 
using System.Collections. Generic;‏ 
USING SYSTEM. LING;‏ 
using System. Text;‏ 


HAME DaCêe SEeVEenBUgS 
Cla PEON 
( 
SEAS TOL MAIN (BERIBOI] AES) 
{ 
Console.Out.WriteLine ("Enter the First and the second number") ; 
Point calculateExpVar = new Point 
X = (uint)Console.ReadLine (), 
Y = (uint)Console.ReadLine () 
ا‎ 
uUint EfesSUult = CaclCulalteEBxp (calCULaAlLEeEXOVAE.X, CalculaleExXDVar. YT); 
CONSOLE: OUE:WELEeLine ("Ihe FESULE 16 $" FF TESULIL:TOSCEILNG OF 
ا‎ 
public UInRnE. CaLlLcuülalteExp (int nümly it nûmÃA) 
{ 
return (uint)Math.Pow ( (double) numl, (double) num2) ; 
ا‎ 
ا‎ 
CUBIC CLIRBS FOIE 
( 
pArIvaEéê UinE _X; 
pGELvaEê UIE _Y; 
pBuUbLIcG UNE. & 
{ 
get {return _X;} 
set {_X = value; } 
ا‎ 
BUDBLILT UIRE 1T 
{ 
get {return _Y;} 
set {_Y = value; } 


ا 


قز قته مجنون بمصلحة المجانيت هو وصديقه نر۷ إلى البح للسباحة 
Ty‏ فغر9 ا اله و و 
الحمام فرسم صديقه في غفلة عنه رأس حمار على المسنشفى نك شفت نماما 
4 معطفه ولما عاد صاحبه و رأی ما رأی قال من ,4 o E ۰. ١‏ ا 
مسح وجهه بار وللت للأسف مريقك ا فقال 
المحنوه ۷ لم يشنو نفسه بل آنا من علقه لی تاره I)‏ 


} 
ڪل عصفور يحب آن يسمع ز 


| 
لا 


1 
a 
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الأخطاء السبعة ... BU0sS‏ / 
الان بلغة الفيبي .نت إعداد وليد بوالطمين 
کود: 


Imports System.Collectlons. Generic 
IMOOEEE SVSLEM.LEING 
LONCCOTEES. SVE LEMe LET 
NAMED SEVENEUGS 
FUDLLCG CLG PEOGEOM 
Public Shared Süûb Main (BYValL args As STEIN (0)) 
Console.Out.WriteLlLine ("Enter the First and the second number") 
Dim calculateExpVar As New Point With _ 
{ 
aX = CONVELFT.ToOUINTES2 (ConsOoLe.ReadLinêe () J; 
.Y = Convert.ToUInt32 (Console.ReadLine () ) 


1 
With calculateExpVar 
Dim result As Ulnteger = CaclculateExp(.X, .Y) 
CORSOLE. OUE.WELITELInNE(TThHE TESULL 15:" € CSTE (EESULE)) 
ENC WIL 
EHO. SUD 
Public Function CalculateExp (ByVal numl As Integer, ByVal num2 As Integer) As 
UIT ET 
ReLUERN CONVErT:TIOUINLS (UML * RUMA) 
ERC: FURNCELOoON 
ERO CLIRBS 
PFUDLLC CLIQUES POILRL 
Private _X, _Y As Ulnteger 
Public Property X() As Ulnteger 
Get: Return _X: End Get 
SEL (BYVEAL vVvaluêé: AS ULNTeGET) 
_X = value 
End Set 
End Property 
Public Property Y¥() As Ulnteger 
Get: Return _Y: End Get 
Set (ByVal value As Ulnteger) 
_Y = value 
End Set 
End PFODEIELCY 
ENC Class 
End Namespace 


5ينة تقضيها من عمرك أمام الحاسب !!! 
في استفتاء قام به موقع شركة 111000.٥00۳١‏ عن معدل جلسة الشخص أمام شاشة الحاسب. تبين من نتيجة الاستضفتاء أن 
الشخص طيلة حياته سيقضي ما متوسطه 6.9064يوما قابعا أمام شاشة الحاسب» أي ما يعادل 24سنة و 6أشهر. ومن 
المتعارف عليه أن أكثر ما يمضيه الإنسان من عمره هو في النوم» فالإنسان يقضي ثلث عمره فيه .ولكن الآن جاء منافس 
لهذه الحقيقة وهي ظاهرة الجلوس أمام شاشة الحاسب. فلو افترضنا أن إنساناً عاش 60سنة فإن 20منها سيقضيها في النوم 
بينما 24سيقضيها أمام جهاز الحاسب!! وهذا بالطبع أكثر من حصة النوم في عمر الإنسان وحتى أكثر من حصة أي عمل 
آخر من عمره. هذه الإحصائيات مع عدم دقتها تجعلنا نتنبه إلى الوقت الذي نقضيه أمام الحاسب» هل يمكن أن نقول إنها من 
الأوقات الإنتاجية أم من الأوقات الضائعة؟ فإن كانت من الأوقات الإنتاجية فربح البيع أما إن كانت دون ذلڪ فهي خسارة 
محسوبة من أعمارنا . 
وهناك برامج عديدة تساعدنا في معرفة كم ساعة نقضيها في الأنشطة المختلفة خلال عملنا مع جهاز الحاسب. منها 
برنامج 165P۲18[ا‏ والذي يسجل لكل برنامج الوقت الذي تقضيه في استخدامه» كما يقدم لك نهاية اليوم تقريرا 
مفصلاً عن ساعات نهارك وكيف ضاعت في متابعة بريدك الإلكتروني أو فى تصفح الإنترنت أو في برامج المحادثة. خلاصة 
) لقول» حري بهذا الجيل ممن عايش استخدام جهاز الحاسب أن يتأمل في وقته الذي يقضيه أمامه» وأن يتنبه 
آيضا لصحته فالتهاب المفصل الرسخي وضعف البصر وتنمل اليد وغيرها ما هي إلى ضريبة قضائنا جل 
أو قاتنا على هذه الأجهزة!! فهل انتبهنا لأنفست!؟ 


eS GS OLR HE 
5 الجهاز يقوم بدوره ببرمجتك...‎ 
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الأخطاء السبعة ... BU0sS‏ / 
الحل إعداد وليد بوالطمين 
کود: 
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الأخطاء السبعة ... BU0sS‏ / 
الحل إعداد وليد بوالطمين 
کود: 
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: نحاد - الحلقة الذولى - 


نجم الذدمغة الإلكترونية 
فيليب ڪان. موؤسس سرك بورلاند 


هذا العنوان مقتبس من مقالةۃ مترجمة نشرت في شمر ديسمبر 19685 في مجلةۃ 
المختار العربية عن ذات الشخصية. 


تعتمد نظرية النجاح في دنيا الآأعمال على المجيء بفكرة عبقرية ا 
ثم تضع خطة عمل محكمة قابلة للتحقيق» ثم تبحث عن الممولين وتضع 
نسبة تقسيم عادلة للأرباح والخسائر» ثم تتوكل على الله وتجتهد. 
هذه نظرية أكاديمية بحتة» وهي وإن تحققت في كثير من الأحيان» لكن لكل نظرية شواذهاء واليوم 
نتناول هذا الأمر من خلال قصة الفرنسي فيليب كان المولود في 16 مارس 1952 العبقري السابق لأوانه 
الذي أبدع فأشهر شركة بورلاند لبرامج الحواسيب» تلك الشركة التي خرج الرعيل الأول من 
المبرمجين العرب يتعلمون على برامجها في البرمجهة بلغتي تيربو باسكال وتيربو سي ودلفي ومنها إلى 
e‏ إدارة قواعد البیانات بارادو ڪس ا الكثير. 
حصل فيليب على شهادة الدكتوراه في الرياضيات من الأكاديمية الفرنسية للعلوم» وعمل بالتدريس لفترة 
قصيرة بعد التخرج» تم تعلم لغة البرمجة باسكال مباشرة على يد مخترعها في مدينة زيورخ .دخل فيليب 
معترك العمل في مجال تقنية المعلومات قبل نشأتهاء في منتصف السبعينيات من القرن المنصرم» حين 
عمل ڪمبرمج في فرنسا على جهاز حمل اسم ميكرال» وهو ما يصطلح المۋرخون على آنه ڪان من 
إرهاصات نشأة المايكرو كمبيوتر أو الكمبيوتر الشخصي الصغير (كان لفظ كمبيوتر وقتها يطلق على 
هذا الجهاز العملاق الذي يتغل غرف عديدة ويحتاج لطاقة كهربية تكفي مدينة صخيرة» و لمحطات تبريد 
خاضة). 
سافر فيليب إلى الولايات المتحدة الآأمريكية في زيارة آراد منها العمل هناك» فكانت أول وظيفة له في 
معامل شركة هيولت باكرد (اتش بي اليوم) لكن هذه الوظيفة استمرت ثلاثة أيام فقط»› بعد أن اكتشفت 
الشركة أنه قدم للبلاد بفيزا زيارة وبالتالي لا تستطيع تعيينه بدوام كامل» لكن يمكنها الاستعانة به 
كخبير فني» وهو ما وافق هوى فيليب» فآسس شركة استشارات فنية آسماها ماركت إن تايم» وهي حملت 
الحروف الثلاثة الأول ام آي تي» لتتشابه مع معهد ماساتوتش التقني الأشهر على مستوى العالم. 
الطريف في الآمر آن مقابلة التوظيف هذه اعتمدت على آن فيليب ضليع مجال ترتيب المعلومات في 
صفوف 19١11ا18()‏ وهي كنذبة استدركها فيليب بقضاء ليال طوال يذاكر فيها بجهد هذه التقنية الجديدة 
خت فار خر کا کل ب فلت اقرا 
بالطبع لم ينل اسم شركته رضا المسئولين في المعهد الشهيرء الذين آرسلوا رسالة شديدة اللهجة 
للشركة الناشئة تطلب تخيير الاسم وإلا.. 
تصادف في ذات الوقت أن كان فيليب انتهى من مشروع طلبته منه شركة أيرلندية حملت 
اسم بورلاند» نشآت في عام 1960 ثم أفلست تاركة ديون عميقة لم تسددها له» فاشتراها 
ق ا و و ا ی ی ا 
vbaarab.com‏ أصولها و ممتلكاتها ی ورک کل اسم بورلا را ا 
بوق قبدوا ٤‏ 
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قصص نجاح - الحلقہ الاولى - 
منقول 

كان فيليب يرى أن الجميع يركز على تطبيقات المحاسبة والكتابة» تاركين مجال البرمجة خالياء لذا 
أراد أن يغطيه بلغة البرمجة باسكال على حواسيب آي بي ام الشهيرة» وهو أراد تطبيقا يحتاج مساحة 
ذاكرة صغيرة للعمل» ويعتمد على واجهة تطبيق أنيقة» والآأهم من كل هذا :سرعة تشغيل كبيرة. 
كانت هذه الفكرة صعبة- بل مستحيلة - التطبيق وقتهاء لكن فيليب فعلها الفشل هو بيساطة فرصة 
في نوفمبر 1983 عندما أطلق تيربو باسكال بمجهود آربعة مبرمجين فقط. جلد لي تیدا هن جریں 
كعادته» سهر فيليب ليلا طويلاً ليضع تصميم أول إعلان للغة البرمجة فقط هذه المرة بذكاء أ كر 
تير بو باسكال» وعمد لخدعة آخرى» حينما دعا مسئول بيع الإعلانات في هری فورد. 
مجلة تهتم بشئون الحواسيب» وتظاهر بآن لديه عروض إعلانات من مجلات 
أخرى» فما كان من البائع الذكي إلا أن عرض على فيليب نشر الإعلان أولاً ثم قبض ثمنه لاحقا. هذه 
الفكرة آثبتت روعتها ونجاحها فيما بعد. 
آراد فيليب ڪذلڪ عقد مؤتمر صحفي لبرنامجه الجديد تزامنا مع معرض كومدكس الأمريكي» لكنه 
كان فقير المال» لذا عمد لفكرة أذكى» أعلن عن مؤتمره الصحفي في مطعم ماكدونالدز للوجبات 
السريعة» وهو أمر لم تستهجنه الصحافة» و حضره صحفي في مجلة بايت الأمريكية» والذي عاد ليكتب في 
ثلاثة أعداد متتالية عن لغة البرمجة الساحرة الرائعة... كما النار في الهشيم» أقبل الناس بجنون على لغة 
البرمجة الجديدة» والتي كانت تباع بسعر زهيد ( 49.99 ) دولار في حين اللغات المماثلة كانت تباع 
بآلاف ومتات الدولارات» خلال سنتين كانت بورلاند قد باعت 300 ألف نسخة من تيربو باسكال» وتحولت 
من شركة يعمل بها آربعة آفراد إلى شركة لديها مئة موظف. 
لم تصفو الدنيا للعبقري طويلا فرغم نجاحاته في عالم أعمال البرمجة» ورغم صراعه مع عمالقة 
البرمجيات مثل لوتس ومايكروسوفت» لكن فيليب تلقى قرار الاستغناء عن خدماته بعد 12 سنة قضاها 
انو في عام 1994 بقرار من مجلس المساهمين» بعد أن بدأت شركته في البعد عن عزف نغمة الأرباح 
وبدأت تتكبد الخسائر الجسام» وكان لقرارات فشلت مثل شراء شركة أشتون تايت وبرنامجها الشهير دي 
بيز برو مقابل 439 مليون دولار استنزف سيولة الشركة» ولتآخر بورلاند في طرح نسخة من برنامج 
قاعدة البيانات هذه تعمل على نظام ويندوز» كذلك بناء مبنى للشركة تكلف مئة مليون دولار وغيرها) 
الفضل في الاستغناء عنه. الفشل الالال ينال أبدا من معادن الرجال الناجحين» لذا استمر فيليب في دربه 
وأسس شركة آخرى سماها ستار فيش للبرمجيات 54۲٣۴١۸‏ المتخصصة في التطبيقات اللاسلكية لنقل 
وتبادل المعلومات .حينما وضعت زوجته ابتنتهما صوفي»› آراد الزوجان تبادل صور الجميلة الصغيرة مع 
بقية العائلة عبر الهاتف ا الكمبيوتر» وهذه كانت لحظة ميلاد فكرة خدمة تبادل الصور عبر الهواتف 
النقالة في هيئة ام ام اس وميلاد شركته الثالثةء إذ كان فيليب يحمل الكاميرا "1٧15‏ الرقمية في يد 
والهاتف النقال في اليد الآأخرى» ومثل هذه المواقف لا تمر على عقلية لامعة مثله» فالسؤال المنطقي 
الطبيعي سيكون لماذا لا نمزج الآلتين معا 

في يونيو 1997/7 كان فيليب قد انتهى من النموذج التجريبي للهاتف النقال ذي الكاميرا 

الرقمية» ليبيع شركة ستار فيش بعد ثلاث سنوات ونصف من إنشائها بمبلغ 253 مليون 

دولار لشركة موتورولا في عام . 1998 احتفظ فيليب بموقعه كمدير لشركة ستار فيش› 


وقام بعدها بتآسيس شركتين جديدتين :لايت سيرف وآوبن جريد» ثم أتبعهم بشركته 


وع فيجوال للسك العرد | 1¥ 
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قصص نجاح - الحلقفہ الاولى - 

منقول 
الرابعة والحالية " فولباور " التي أسسها مع زوجته في عام 2003 الجدير بالذكر أن تطبيقات التقاط 
الصور الرقمية تعتمد على خوارزميات لضخط هذه الصور لتشغل ج اکل هذه الخوارزميات كانت 
محل دراسة فيليب في آطروحته» كما وتعتمد شركة كوداك في كاميراتها الرقمية على برامج صممتها 
لها شركه فيليب. 
لا تظن آن فيليب ڪان ا نخدا على الدوام» فهو يعترف بارتكابه آخطاء إدارية كثيرة» متل مشروعه 
لتصميم مساعد رقمي شخصي يمكن آن ترتديه» ثم تضعه في مقبس توصيل مع حاسوبك النقال لتحديث 
البيانات ثم تعود لترتديه» وخطاً فيليب- كما يخبرنا بنفسه -أنه باع حق استغلال اختراعه هذا لشركة لم 
تستطيع تسويقه على الشكل المطلوب» ما أآدى لأن تسبقه شركة بالم بمساعدها الرقمي بالم. 
لليوم» لازال فيليب من مستخدمي بڊبرامج شر كته السابقة بورلاند.» ولا زال يذكرها يكل خير» ولازال 
يدعمها. تتجه بورلاند اليوم للتركيز على توفير بيئة برمجة وتطوير للشركات كڪبيرة الحجم» وهي 
علمت أن وخاصة لغة البرمجة 1(٤‏ تميزها يآتي في مجال بينات تطبيقات التطوير دلفي التي لها محبون 
كثيرون .قد لا تكکون بورلاند لاقت ey‏ أفضل من شر كة نتسكيب» لكنها تبقى ضمن ضحابا 
مايكروسوفت» على آنها تثابر للخروج من عترتها. 


الدروس المستقاة 
- خسرت بورلاند المعركة لصالح مايكروسوفت لأنها حادت عن الإبداع والابتكار» كما لم توفق 
آو ضاعها بشكل سليم مع تزايد حجمهاء ولم تتناغم مع توجهات السوق بشكل إيجابي. 
- في بدايته» استخدم فيليب سلاحا تسويقيا جديدا : باع لغخة برمجة 
رائعة بسعر متدن» فتعلمت مايكروسوفت منه الدرس» وردتها له في 
صورة برنامج قاعدة بيانات بسعر 99 دولار» في حين كان سعر منتج بورلاند المماثل 795 دولار. 


وداعاً نتسكيب/القصة الكاملة لعمید متصفحات الإنترنت الذي تم إيقافہ 


الدعم و التطوير لمتصفح نتسكيب الشهير نهابة 
الشهر القادم فبراير 20086 بعد فشلها في 
الحصول على حصة معتبرة من سوق المتصفحات Satari‏ - 514% 
العالمية» والذي يسيطر عليه متصفح مايكروسوفت VW 065% - Opera‏ 


B77 35% - Microsoft Intermiel Explorer 
WiB01% -Firefox 


قرار شركة أميركا أونلاين ]۸0 إبقاف ا 2 
مع قرار شر و ڪا ا : حصة التصضحات اللعالية 
5 
tt‏ 
4 


I OE0% - Netscape ا‎ n 0ر‎ e 
009% - Mozila اكسيلورر بنسبه تفوق %75 واتحاه فريق‎ 


التطوير لدفع مستخدمي نتسكيب لاستخدام Olher‏ - 0.16% 
متصفح موزيلا فايرفوكس» المجاني والمفتوح 
المصدر» كبديل آفضل وآكتر قوة» نستعرض في 
تقنية المعلومات» القصة الكاملة لأآأشهر متصفحات 


riyal. cari 


الإنترنت وأقدمها بعد متصفح موزاييڪ . 


TT 
الل‎ 
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وداعاً نتسكيیب/القصة الكاملة لعمید متصفحات الإنترنت الذی تم إيقافہ 


ee 


قصص ر بادة و سيادة و حروب_ منفول 

ظهرت أول نسخة من المتصفح في 13اكتوبر 1994م بواسطة كل من مارك أندرسن و جيم كلارك» تحت 
مسمى0.9 .Moazic Netscape‏ وتم تغییر الاسم إلى orأNaviga Netscape‏ لتفادي آي مشكلات مع جامعة 
إلينوي و N.54‏ صاحبة المتصفح 10851٥‏ والذي يعد أول متصفح شهير للويب وتم إيقافه في 1997ء واستطاع 
المتصفح نتسكيب أن يهيمن على أكثر من 80 % من عالم متصفحات الويب» ومع طرح الشركة للاكتتاب العام في 
9اغسطس 1995م بسعر14 دولارا للسهم» حقق في أول يوم تداول سعر 75دولارا ما جعلها قريبة من تحقيق رقم قياسي 
في تداولات اليوم الأول في تاريخ البورصة آنذاك» وواصلت نتسكيب تحقيق النجاحات بتطويرات مهمة لمتصفحها وبرامجهاء 
وآهمها توحيد معايير التصفح بغض النظر عن آنظمة التشغيل المختلفة التي يعمل عليهاء لتطور بعد ذلك تقنيات تمكن 
المستخدمين من الوصول وتحرير ملفاتهم في أي مكان عبر الإنترنت» أياأ كان الجهاز المستخدم أو نظام التشغيل . 
وفي يونيو 5 اقام فريق من المدراء التنفيذيين لمايكروسوفت بزيارة لشركة نتسكيب والتي كانت أرباحها تتضاعف 
ڪل ربع سنة تقريبا في ذلك العام عارضين تقاسم السوق بينهماء وتقديم متصفح ويب للويندوز مع إعطاء نتسكيب المجال 
لأنظمة التشغيل الآأخرى» وهو العرض الذي رفضته شركة نتسكيب» وضد قوانين متنع الاحتكار» ما جعل مايكروسوفت تبداأً 
ما عرف بحرب المتصفحات» وطرحت النسخة الأولی من متصفح انترنت اکسبلورر ٤×p10۲۴٣١‏ ٤٤٣"آاnte]‏ ڪجزء من 
حزمة Win d0wSs 95 Plus Pac)‏ وواصلت نتسكيب وضع المعايير الأساسية وتطوير العديد من الميزات الجديدة 
لمتصفحهاء استمرت مايكروسوفت في إصدار نسخ متتالية من متصفحها ومحاولة تحسينه» وبنفس الوقت شحنه مجانا 
كجزء من نظام ويندوز» ومع الإصدار الثالث من انترنت اكسبلورر 3.0 1£ أصبح في وضع منافس من ناحية الميزات 
التقنية مع نتسكيب C0١1 11٤20٣‏ ممNetsca‏ ليصبح اكبر استقرارا في النسخة الرابعة وقامت مايكروسوفت 
بدعمه بشكل آكبر مع سيرفرات ويندوز N1‏ وشهدت شركة نتسكيب أول نهاية ربع مالي سيئة في تاريخها نهاية عام 
7 ءهءم» واضطرت لتسريح عدد من موظفيها في يناير 1996م ما أعطى علامة سيئة على عدم قدرة الشركة على 
مواجهة المنافسة الشرسة وغير العادلة من مايكروسوفت» لتقوم بخطوة أخيرة في يناير عام 1998بإعلانها مشروع موزيلا 
للمصادر المفتوحة» وإتاحتها للشيفرة المصدرية لمتصفح 4.0 ا0ا Netscape Communica‏ لیصبح اشھر مشرو ع 
مصدر مفتوح في العالم» ولم تفلح وزارة العدل الأميركية في دعواها ضد مايكروسوفت في مايو 1998بالرغم من 
مساهمة كبار المدراء التنفيذيين في نتسكيب بتزويد الوزارة بمستندات ووتائق تتبت سوء النية والتصرف لمايكروسوفت 
في حرب المتصفحات . 


e 


شراء د 
في نوفمبر 1996 أعلنت شركة ۸01 عن استحواذها على شركة نتسكيب» في عملية تبادل أسهم معفاة من 
الضرائب قيمتها 4.2مليار دولار» لتنقسم آراء المراقبين والمحللين بين مؤيد ومعارض» وحتى في كيفية استيعاب وتفسير 
هذه الخطوة» لتقوم بإصدار النسخة السادسة من متصفح نتسكيب 6.0 في نوفمبر 2000 اعتمادا على شفرة متصفح موزيلا 
0.6 ه[M07i1‏ ليليه النسخة السابعة من نتسكيب اعتمادا على 1.0 ه[از107× في مايو 2003دفعت مايكروسوفت 750 
مليون دولار لشركة .۸01 في إطار تسوية بينهماء كتعويض للأضرار التي لحقت بنتسكيب من أسلوب مايكروسوفت 
الاحتكاري والمنافسة في السوق» ووافقت على مشاركتها بعض التقنيات» مع إعطاء الحق ل ]۸0 حق ترخيص واستخدام 
وتوزيع 1 لسبع سنوات» ما اعتبره العديد نواة موت متصفحات نتسكيب . 
في الفترة بين 2005 و 2007 تم إصدار النسخة 6 من المتصفح Netscape 5۲0WS6©٣‏ كمتصفح منفرد» ولیس 
كحزمة برمجية كاملة» وفي 2006 قامت ۸01 بتغيير كامل لبوابة N65٥4 6.٥0۳١‏ ليصبح إحدى أشهر البوابات 
الاجتماعية في الولايات المتحدة. وتم إصدار نسخة جديدة من المتصفح 9 Netscape navig a0٣‏ في 2007 اعتمادا 
على شفرة 2 ×10 ۴1۲۵ 
النهاية قرار ]۸0 بإيقاف التطوير والدعم للمتصفح بالرغم مما يمثله للعديدين من افتقاد وغياب لأشهر المتصفحات 
وآقدمهاء وما يرمز إليه من حقبة ازدهار وتطوير تقنيات الويب» !ا آنه في رآي البعض من المراقبين خطوة سليمة وإن 
تأخرت» وذلك لمواجهة هيمنة متصفح مايكروسوفت انترنت اكسبلورر على المتصفحات بنسبة 0/77 بالرغم من عدم 
مطاف تعاضر تونب الأساسية عله ان المتسفم تسب سحو ةحاتا على 00:60 من ات فحت 
مقابل 016.01 لفايرفوكس,» والجدير بالذكر هو دعم اللغخات (ومنها اللغة العربية) في متصفح نتسكيب 
منت البداية» يل وأفضليها دشا آنذاك: ج الفرصة لمتصفحي المواقع العربية التصفح بسهولة» وا ل 
أقو ل سوی اا EEE‏ 


بشت انر المصدر/جريدة الرياض العدد10/01/2008 1¥ 
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ا ک الود 


Magazine Foldefw 1 


أخيرا وفي سابقة في تاريخ مايكروسوفت. أصبحت الشفرات البرمجية لوكتبات الفريم وورك .نت مفتوحة 
الموصدر بحيث صار بإمكان الوبرمجح أن يطاع على الشفرات المصدرية مع جميع التعليقات التي كتبها المطورون في 
.BCL Team Jl‏ 


خلال هذا المقال سنتعرف سويا على الخطوات الواجب تنفيذها للوصول إلى الشفرات المصدريۃ 
لوحوعات إطار العمل .نث 


أعلن Scott üتuاh r1٥‏ أحد روؤساء فرق التطوير الخاصة بتقنيات الدوت نت في فرع مايكروسوفت 
للبروجيات أن الشركة وضصعت تحت تصرف المبروجين إمكانية قراءة الشفرات البروجية الخاصة باطار عول الدوت 
نت ون الفيجوال ستوديو 2008. 


اعداد الفيجوال ستوديو لتنقيد الشفرات الوصدرية لإطار عول .نت 


البرامح اللازم نتبيتها 


- عليك أن تعرف أن هذه الخدمة غير متوفرة في النسخة المجانية ووم م×E‏ للفيجوال ستوديو 2008. 
- في كل ما سيأتي» كلمة و[امطامطر؟ الانجليزية تعني اسم طريقة ل0ط)هM‏ أو خاصیة y٤إeم‏ ہ۴ أو حقل 1dع۴i‏ 
1. أولا عليك تنصیب البرنامج Q۴۴‏ 2008 i0لنا؟‏ امuو¡۷»‏ هذا البرنامج عبارة عن ملف تصحيح يقوم بتحديث مكتبة 511 خاصة بمنقح 
سک ت له دالط فون امه ها مك تر اء مغلرمات :نة عل فة القريل 
- إذا حصل خطأ أثناء عملية التنصيب حاول بإدخال قرص الدي في دي الخاص بالفيجوال ستوديوء قد يكون هذا الخطاً ناتج عن إمكانية 
تعارض ناتجة عن وجود نسخة أقدم من الفيجوال ستوديو. 
2. بعد استكمال عملية التنصيب» قم بتشغيل الفیجوال ستوديو 2008 و اذهب Tools > Options > Debugging > General Jll‏ . 
ان کت تغل الجر ال ستو دیو عل (غدادات الجر ال بسك افتراضها غلك خط اة الخارات المو جودة في أسفل اة الاغادات قل 
المواضاة. 
قم بتغيير قیم الإعدادات التالية: 
Just My Code -‏ eاEnab:‏ اضبطھا علی الخیار .0۴F۴‏ 
Source Server Support -‏ eاEnab:‏ اضبطھا علی الخیار ×0. 
ستكون نافذة الإعدادات الخاصة بالفيجوال ستوديو كما في الصورة التالية: 


> Help 


Import i او‎ Settings Enable breakpoint filters 
- E Enable the exception assistant 
8 Unwınd the call stack on unhandled exceptions 
: 8 1 3 Enable Just My Code (Managed only 

dSkK LIS ا‎ 
|_| ڈ٣‎ EMIDETS T' -uıser objects in varlables windows (Visual B 
Web Browser |_| Show all rmermbers for non-user objects in variables windows (Visual Ba 


E HE TE [_| Warn if no user code on launch 


[ Projects and Solutions 
» Source Lontrol 
î Text Editor 
» Database Tools Hentraurca caper erTMiostic messages to the Output window 
ı Debugging Wl Hıghlıght entire source line for breakpoınts and current statement 
General Require source files to exactly match the original version 
Edit and Continue î Redirect all Uutput Window text to the Immediate Window 
Just-In- Time I | Show raw structure of objects in variables windows 
Native Suppress JIT optimization on module load (Managed only] 
Symbols 4 ıı 
f» Device Tools 


Enable property evaluation and other Implicit function calls 


7| لاھ‎ چtىنەnچeعەerer‎ hon function on objects in variables windows (C# ancl _ 


- 


Show all settings 


3. انتقل من التبويب هع "ع6 إلى التبويب ءام اصر؟ كما يظهر في الصورة الاآتية و قم بتغيير الخصائص الثلاثة التالية: 
أ. قم بإضافة العنوان التالي إلى منطقة http://referencesource.microsoft.com/symbols: Symbol file location J‏ 

ب. قم باختيار مجلد لتخزين الملفات ال طءهء التي يتم تنزيلها من الخادم على العنوان السابق و تأكد من أن المجلد ليس للقراءة فقط. 

الاختيار الأفضل هو مجلد تحت مڊجلد حwسlبك c:\users\yourUserName\synabols)‏ تحت llفيسIî‏ و c:\ documents and‏ 

.)xp تحت الوینداوز‎ settings\|your User Name\symboإئs‎ 


. قم بتفعيل الخاصة .Search the above locations only when symbols are loaded manually‏ 
هذه هي صورة نافذة الإعدادات بعد القيام بالتعديلات السابقة 


AP 
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International Settings .| Symbols 


Ea Using symbol files from an unknown or untrusted location can be harmful 
Startup sS to your computer, 


Task List 
Web Browser Symbol file (.pdb] locations: SEBEB 


Performance Tools 
Projects and Solutions 
Source Lontrol 

Text Editor 

Database Tools 


Debugging 


teneral 
Edit and Continue Lache symbols from symbol servers to this directory: 


ht In- Timê ci llserstisburketSymbols 


Native 

Symbols 
Device Tools 
HTML Desıgqner 
Uffice Tools 


http: referencesource,.miıcrosoft.comy/ symbols 


search the above locations only when symbols are loaded manually 


[_ [Load symbols using the updated settings when this dialog is closed 


انهينا عملية التنصيب... إلى العمل 


التنقيدح داخل شغفرة إطار عمل الدوث نت 


سنستعمل مثال بسيط باستخدام لغة السي شارب على مشرو ع من نو ع )ز٥۴‏ ۸٥ica)10اpمA Windows‏ لکن يمكنك استعمال نفس الخطوات 
على اي مشروع أخر بلغة اخرى. 


1. قم بإنشاء مشروع جدıد ja‏ نوع Windows Application Project‏ تم اضغط مرتين على النموذج ليظهر لك محرر الشفرات كما 
في الصورة التاليةء قم بكتابة الشفرة كما يظهر في الصورة و أضف نقطة توقف (Breakpoınt)‏ على سطر الامر. 


private vold Forml Load{object sender, EventArgs €} 


"Debug Me!"; 


2 آلآن ك بتشغل الر نامج بالضغط على الأزر 85 سر فف المترجم عند تفط التر قف التي أضفها و ف باظهار تافذة رض 
الاستدعاءات ()عه؟ 11ج٤)‏ بالضغط على الاختصار ))۸R11+۸11+٥(‏ › بعدها قم بالضغط على بالزر الأيمن للفأرة على 
عنصر يبدأ ب ۴0۲18.11 System. Win d0 wS.‏ من عناصر القائمة واختر الأمر "ئامطصر؟ 1044"» هذه العملية تقوم بتحميل 
ملفات الشفرات البرمجية الخاصة بالمجمع كصإهS.۴س0لمW1.صmعtءرS‏ من عنوان الخادم و الذي يبلغ حجمها حوالي 10 ميغا 

لذلك عليك الصبر قليلا إن كان اتصالك بشبكة الانترنت بطيئا. 


بأابت»› 
» م 1 


e 


vbêarab.corm 


8 
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Tivate YToOid Forml1l Load iobIeEct sender, EventArgs fF 3 8 
Pp اد‎ . 3 Hexadecimal Display 


e = : Isniklresrm DiFher Treas‏ ن 1 د 
Text = "Debug Me!"; e‏ 


ILE ا اا آل آلا‎ ILI rv 


Symbol Settings... 
Show Module Names 
Show Parameter Types 
Show Pararmeter Names 
Show Pararmeter Values 
Show Line Numbers 
Show Byte Uffsets : 
O ay5 tem. Windows, Farms. dll! 5y اا اا وات اع ااافا أ فا فاط افا فاا اقا ااا اقا اة ا قفالا فاط اا اا‎ Windows, Fi 
System, Windows, Forms, dll!System, Windows, Forms, Scr allableContr al. WndProc{ref System, W 
System, Windows, Forms. dll!System, Windows, Forms. Container Control, WndPrac{ref System, 
System, Windows, Forms. dll!System. Windows, Forms. Farm, Wm3howWindow{ref System, Windd 
System, Windows, Forms. dll!System., Windows, Farms. Form. WndProac{ref System. Windows, Far 
System, Windows, Forms. dl!System, Windows, Forms. Control, Contr alNative Window. OnMessag 
System. Windows, Forms. dll!System. Windows, Farms. Control. CantralNative Window, WndPracll 


TWindowsFormsApplicatiaon2Z.Form 1 Windowsf € WindowsFormsApplicationz. 
H4 # sender {WindowsFormsApplicationZ2. Farm 1 abject {VW System, Windows, Forms, dll: 
HH ټ@‎ e System.EventArgs} System.E System. Windows. Farms. dll!; 
System. Windows, Forms. dll! 
System, Windows, Forms. dll! 
System, Windows. Forms, dll: 


ENS 


ستتوقف بيئة التطوير عن الاستجابة أثناء عملية التنزيل» ولكن عملية لتنزيل هذه لن تتكرر لأن ملف الشفرات سيخزن في مجلد الكاش 
(الذي قمت باختیاره سابقا) علی شکل ملف PB‏ خاص بکل مجمع علی حدةء يمكنك الاستعلام عن تقدم عملية التنزيل بمشاهدة منطقة 
ProgressBar ÛJI‏ ف„ شرhıط‏ llÛlة .Status Bar‏ 


3. ستلاحظ بعد انتهاء عملية التنزيل أن لون العناصر التي تبدأً ب 0۲18.11 s.۴س0w System. Wind‏ من اللون الرمادي إلى اللون 
65 s.۴0س0wل Win‏ بالضغط عليها بالزر الأيمن و اختيار الأمر وامطأصر؟ [٥24‏ في كل مرة تريد الاستعلام عن شيء ما. 


all Stack —_ OA wi 


@ WindowsFarmsApplication2.exe!WindowsFarmsApplicationZ2.Form 1.Farm1_Load{object sender = 1 sApplication2.Form 1, 1 C# 
System. Windows. Farms. dll!System,. Windows, Forms. Form, OnLoad{System.EventArgs e) Line 4300 CF 


System. Windows. Forms. dl!System., Windows. Forms.Form.OnCreateControl) Line 4535 C#‏ أ 
System. Windows. Farms. dl!System, Windows, Forms, Control, CreateCantrol(boal fIgnorevisible} Line 5715 CF‏ 


System, Windows. Farms.dll!System. Windows. Forms. Control, CreateControl) Line S657 


4. يمكنك الاآن تتبع سير الشفرة الخاصة ببرنامجك و تتبعها سطر بسطر بإضافة نقاط التوقف و استعمال الزر ۴1 الذي يقوم بتنفید 
الشفرة سطر بسطر» كما يمكنك مواصلة التنقيح خطوة خطوة داخل ملف ال]]5 الخاص بالمجمع باختيار العنصر الذي تريده من 
نافذة ال )عه؟ ٥211‏ و الضغط على الزر ۴11 مجددا لينتقل المترجم إلى ملف الشفرة. 


ا و ی ق ا ر ر ا ا ع 
)ءءء لتبدأ عملية التنزيل. 


۳ e 
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اعداد الفيجوال ستوديو لتنقيد الشفرات الوصدرية لإطار عول .نت 


Eg a a a ay a a 2 EET mT 
: WirdowsFormmsApglke am | ا‎ = MÎ = ET 1 1 E O HT TEWL 


Er ET TT E NLN NN I CT ` «| aM SatlYnaelectedlama 3 
1 : ay ج چ 2 ڪڪ تة س = = : ت‎ 6 > = 3 a = = a 


lima |? TA He FIA Oh e EES SOARS HS ARA: 
; Pra [IEA] iredoewaF ores = Thread: [ITE] Ham Thread ت‎ F (f Sack Frame Sytem. inda. Forma.dilf + ت‎ 


j mea ma oem mam ms > mms ms SR BI sm mm mem mcm yS. د = = > ی‎ m= 


[HEETAngFEindable [TFEE] ]‏ ا 
ا pubiin orerride string Tent‏ 3 
gez |‏ 5 
Feti baê. TERE‏ | 
| 
B at‏ 
أ base Text = vaîue‏ + 
3 | 
أ ۲ ۳ 
| 
٣ inelide file="doe\Fiéri.üêx' pê sa dac [REot= "Fata. TapLeve1™)] ="‏ 
zie TEGE‏ 
PTA‏ 
Gets aE seta a value imlimsting whether tû dîisplsy the Forms as û top-level‏ 
virda.‏ 
para?‏ | 
[BEES aBLE j FaALSSF, EAicatOFoaabls (Edit FEFTORaASBIESESEE. AQTaBEEI j, Deal gGrETFIaTi lI 71 LÎ‏ 
Bi publis begl TopLevel [‏ 
١. qêz f -‏ 
FF j‏ 2 
E EN‏ 
ع و 2531 a STi. incleg Forra_ dbn, rota Form, Form. Tart. melem akir] Lrg‏ 
Windom grmgApplca on 2eme! irik ormmekppglcs ton 2F orm 1o 1_Loadfpijert sender = {rdan ormedpgpkcaScon îd. Form lf, Sytem ErertArgê e = (pte CE‏ 
BST rea Fora ITS alee, r oa Foe. Forte. rl os hes. Err gj Lng ED 1 |‏ 
EEE a e LS a e a ge E o I re E‏ 
E aT rahar: Sete, Mirdias Forms. Conia. CresieCanir oi bol fignaretsbir’) Lire S715 -‏ 
iyi, nele Farrage, Nira Farag. Canal rao] Lire EET n‏ 
Syren ulan. Fore esle, rarer Fore, Control. mha nde ef Sg ben. irade Ferma, Merga ml Line A15 E. |‏ 
که Etr ire Fora SSL. iir Fe Can Tal. Pr rE SELE rrr Fara Mtaagt 2 La LAI‏ 
a ack Cf Freakpe [2 JCommand Wedow immediate Window | 2] Output [i-JTest Results‏ رخ 
Rtikdy ln 53l e17 Ch 1î IN‏ 


لمشاهدة أي شفرة مصدرية لمجمع آخر» عليك بإتباع نفس الخطوات السابقةء مع ملاحظة أن عملية التنزيل لكل شفرة مصدرية خاصة بمجمع 
جديد تتطلب الموافقة على شروط ال E01۸‏ مرة واحدة لكل مجمع. 


٘ يعض الحالات قد لا تجد اسم المجمع الذي ترك ن تشاهد الملفات المصدرية الخاصة به في نافذة الل وء [[وع» كما في المتال التالى: 


private ¥old Forml Paint (object sender, PaintEventArgs e] 


الزر ۴۳11 للدخول إلى الشفرة المصدرية لل عإعمهاءمRسهإ5.ءءنطإمهاG‏ يجب أن تقوم بتحميل ملفات الطلم الخاصة 
الرموز Symbols‏ اأخاصة يجميع المحتويات و ڏک بعرض نافدة Modules Window‏ بالضغط عل الاختصار 
© (ستظهر هذه النافذة أثناء عملية التنقيح فقط). ستقوم النافذة بعرضص لائحة بجميع الرموز المحملة من طرف المنقح» اختر 
System.‏ في القائمة و اضغط بالزر الأيمن لاختيار الأمر sاهاصر؟‏ لهه[ كما يظهر في الصورة التالية: 


إعداد الفيجوال ستوديو لتنقيح الشفرات المصدرية لإطار عمل .نت 


dules 

Name Path Cptimized User Code Symbol Status Symbol File 

System. Deployment.dll LN WindowstassemblytaAL_MSIL.. Yes NA Lannot find or O... 

System.dll LN WindowstassemblytûAL_MSIL... Yes NA Lannot find or O... 

System.Drawing.dll CN Window E Co Cannot find or 0... 

System. Windows,Forms.dll LAN Window ۰ Symbols loaded.  cAlUsersisburketSymbols... 
System Xml.dll CAWindow E Canmol fil or o 
WindowsFormsApplicationd,exe citempiWw Load Symbols | symbols loaded. citemp\WindowsFormsA... 
WindowsFormsApplicatliond.vshost.exe citempi\Ww Symbol Load Information... Lannot find or 0... 


Symbol Settings... 


لاحظ أنه بمجرد تحميل ملف الرموز» ستجد مساره معروضا في العمود » Symbol File‏ « 


الآن يمكنك أن تدخل إإأى شفرة الأمر مإعمهاءءRسهإء2.ءcنطمواG‏ وتتبع عملية الترجمة خطوة خطوة بالضغط على الزر ۴11. 


اعتيادياء في كل مرة تبدأ فيها عملية تنقيح» بيئة التطوير 0لں؟ 21 uء۷‏ تقوم بتحميل الملفات اللازم لكل مجمع تود تتبع التنقيح فيه 
بعد أن يتأكد من وجود الملف في المجلد الذي يخزنها فيه (و الذي قمنا بشرح كيفية اختياره و تغييره في الفقرات السابقة)» بعض المشاريع تتطلب 
الكثير من ملفات طلم الخاصة بكل مجمع ما يجعل العملية تتطلب بعض الوقت و قد تتطلب وقت كبير جدا في حالة عدم وجودها على القرص 
الصلب لأنه سيقوم بتنزيلها من الموقع» لذلك ننصح بتتبع عملية التنقيح يدويا عن طريق اختيار الأمر sإاماص_ر؟ 1.٥44‏ من القائمة المنسدلة (كما 
شرحناها سابقا) بدلا من الاعتماد على الترجمة سطرا سطرا بالضغط الزر ۳11 لهذا السبب» قمنا باستعمال عملية التحميل اليدوية سابقا. 


عل کل حال هات طر لل عة اتحل د ادى عل اتح الف الما و كي قن ات ترم ال رك د نة 
الإعدادات و اختيار التبويب و[مطدصر؟ (يمكنك الدخول إليها مباشرة باختيار الأمر وعدنا)ءS؟‏ sامطصر؟‏ من القائمة المنسدلة فوق نافذة رصة 
الاستدعاءات (س0wلwin )ca11 stack‏ أو نافذة ال sمإModu‏ (1+0اA1+ا۲R))‏ (ستظهر هذه النافذة أثناء عملية التنقيح فقط)) بعدها قم 
بنزع العلامة صح من أمام الاختيار ...0«sناcaه1 Search from the above‏ (كما في الصورة الآتية)» الهدف من هذه العملية هو جعل 
المنقح في بيئة التطوير يقوم بتنزيل جميع ملفات الم من الموقع مع أول عملية ترجمة للمشروع (۴5). 


بعد أن تقوم بنزع العلامة قم بإغلاق بيئة التطوير و أعد فتح مشروعك من جديد» عندما تكون مستعدا لعملية التنزيل الكلية عليك بترجمة المشروع . 
بالضغط على زر ۴5 ومن ثم ستبدأً عملية التنزيل لجميع ملفات ال طلم المتعلقة بمشروعك و تخزينها في القرص الصلب. عليك أن تعلم أن حجم 
هذه الملفات في العادة هو 50 ميغا و هو حجم كبير نسبيا و قد يتطلب بعض الوقت» لذلك لا تجزع إن لم تستجب بيئة التطوير و يستحسن أن 
تتركها و تقوم بعمل آخر. 
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Symbols 
1 Using symbol files from an unknown or untrusted location can be harmful 


to your computer.‏ ,„ ل 
اتا ادات 


symbol file (.pdb] locations: 
http: referencesource,.microsoft.comysymbols 


Lache symbols from symbol servers to this directory: 
cAlUsertisburket Symbols 


[| Load symbols using the updated settings when this dialog is closed 


يظهر في الصورة التالية: 


Symbols 
Using symbol files from an unknown or untrusted location can be harmful 


to your computer, 
5 x | 3 BH 


http://referencesource.microsoft.com,/'symbols‏ ۳ ل 


Lache symbols from symbol servers to this directory: 
cillsersisburket symbols 


ae 


IF [Search the above locations only when symbols are loaded manually 


I [Load symbols using the updated settings when this dialog is closed 


r 
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إعداد الفيجوال ستوديو لتنقيح الشفرات المصدرية لإطار عمل .نت 


Environrment 
Performance Tools 
Projects and Solutions 
Source Lontrol 
Text Editor 
Database Tools 
Debugging 
eneral 
Edit and Continue 
Just-In- Time 
Native 
Symbols 
Device Tools 
HTML Designer 
Uffice Tools 
Test Tools 
Text Templating 
Windows Forms Designer 
Workflow Desraner 


بعد استكمال العمليةء قم بتوقيف المنقح و عد إلى نافذة الإعدادات و قم بنزع العلامة صح من أمام عنوان موقع التحميل و أضغط على موافق كما 


Environrment 
Performance Tools 
Projects and Solutions 
Source Lontrol 
Text Editor 
Database Tools 
Debugging 
Leneral 
Edit and Lontinue 
Jlust-Iin- Time 
Native 
Symbols 
Device Tools 
HTML Desıgner 
Uffice Tools 
Test Tools 
Text Templating 
Windows Forms Designer 
Workflow Deslaner 


إعداد الفيجوال ستوديو لتنقيح الشفرات المصدرية لإطار عمل .نت 


عليك أن تعرف أن الانتقال إلى مشروع آخر يستعمل مراجع إلى مجمعات مختلفة أو أردت أن تضيف مجمعات جديدة إلى المشروع لتستعملها 
يتطلب إعادة القيام بالمراحل السابقة مع العلم أن المجمعات التي تم تنزيل ملفات ال الم الخاصة بها لا يعاد تنزيلها إن استعملها مشروع آخر. 


يعض الأسئلةۂ و الإاجاباتث عنما 
الكاتب الأصلي للمقالة يتكلم هنا... 
1/ ما هي المجوعات التي تتوفر ملفات اكم لها؟ 


e Mscorlib.DLL 

e System.DLL 

e System.Data.DLL 

e System.Drawing.DLL 

e System.Web.DLL 

e System.Web.Extensions.DLL 

e System.Windows.Forms.DLL 

e System.XML.DLL 

e WPF (UlAutomation™.dll, System.Windows.DLL, System.Printing.DLL, System.Speech.DLL, 
WindowsBase.DLL, WindowsFormsIntegration.DLL, Presentation*.d11, aرخألا (وبعض لمجمعات‎ 

e Microsoft. VisualBasic.DLL 


2/ عندها أقوم بالضغط على الخيار S١015‏ 024[ من القائوة الونسدلة تظمر لي نافذة فتح ملفات تسالني عن 
ولف ال 6 ۶۴0 لواذا؟ 


تظهر هذه اأنافدة ف حالة من الحالات التالية: 


- لم تقم بوضع عنوان مصدر الملفات من شبكة الانترنت بطريقة صحيحةء تأكد من وضع هذا العنوان كما أوضحنا 
http://referencesource.microsoft.com/symbols lal‏ 

- لقد قمت باختيار عنوان مجلد لا تملك صلاحية التعديل فيه. 

ا فت اقل مخ عر محرد ق اة اعا 

- تأكد إن كنت تملك نسخة أخرى من إطار العمل .نت مثبتة على جهازك» قد يحصل هذا إن كنت تستعمل متلا النسخة التجريبية ها8 من 
نظام التشغيل 2008 إء۷إعء sس0لماس»‏ للتأكد من آنك تملك النسخة المتوافقةء اذهب إلى نافذة ال sعاuلمMN‏ بالضغط على 
( 1+411+1 Rا))‏ (ستظهر هذه النافذة أثناء عملية التنقيح فقط) و التأكد من أن رقم النسخة الخاص بالمجمع 11.ط0۲11عئص هو 
3 كما في الصورة التالية« أو تأكد من أنك قمت بتفبيت lالإۈضlفة RTM Version of the .NET Framework‏ 
.5 بصورة صحيحة. 

mscorlıb.dll A SUFAT 1433 (REDBITS.OSO727-1400)‏ ا 

System. Lonfiguration,dll A N 1433 )REDBIT S.07 27-1400]‏ ا 

System. Data.dll AR 0727 1433 )REDBITS.OSO7 27-1400]‏ ھا 

)REDBIT SOSA 27-1400]‏ 1433 ےلات System.Deployment.dll‏ ا 


- تأكد من وجود الملف وعر.۷إئررء في المجلد 7\19۴ )..]Microsoft Visual Studio 9.0\Com n0‏ و أعد تشغيل بيئة التطوير 
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3/ عندها أحاول فتد أو الدخول إلى نافذة الكود« أتلقى رسالA‏ تتJqg "Source is not available for this‏ 
"ionاهcد|‏ أو تظمر لي رسالة الحوار السابقةء ما هو السبب؟ 


أولا عليك أن تطالع السوال السابق لكي تتأكد من أن ملفات ال P58‏ قد تم تحميلها بصورة جيدة» يمكنك التأكد من ذلك بمشاهدة العمود 
Symbols Status »‏ « . 


إذا كان الحقل في الخانة « كuاه)S‏ sإاماصر؟‏ » يحمل العبارة ed."‏ ل102 sاهاصر؟"‏ عليك بالتالي: 


- إذا قمت بضبط Microsoft Syصmط01 Server‏ سابقا» يمكن أن تكون قد قمت بتنزيل ملف ال P58‏ للمجمع لكنه لا يحتوي على 
معلومات عن الشفرة. حاول أن تغير مسار تخزين الملفات أو قم بحذف المجلد نهائيا و أعد عملية التنزيل بالضغط على الأمر 024ا 
086م (الطلع على السؤال التالي للمزيد من المعلومات). 

"Enable Source Server" :يئllتll في نافذة الإعدادات على المسار‎ Enable Souce Server تأكد من أنك قمت بتفعيل خانة الخيار‎ - 
item on the Tools -> Options -> Debugging -> General 

- تأكد من أن حسابك يملك صلاحية التعديل على مجلد التخزين (لمستعملي الفيستا بصفة خاصة). 


4/ آنا استعمل خادم مایکروسوفت 56٥۷٥١‏ b01صSy‏ اosoiآاMic‏ اتنزیل ملفات الشفرات منہء ہا الفرق بینہ 
و بين الطريقة التقليدية؟ 


موقع Microsoft Symbo1 Sever‏ يوفر ملفات ۲58 بدون أي معلومات عن الشفرة بداخلهاء هذه المعلومات تم حذفها قبل نشرها رسميا 
على الموقع الذي استخدمناه سابقا خلال هذا الشرح لتنزيل ملفات http://referencesource.microsoft.com/symbols).PDB ÛJI‏ (. 


الهدف من إضافة مصدرين للملفات و هما العنوان السابق (sامhttp://referencesource.microsoft.com/symb)‏ الذي يوضع قبل 


المصدر الثاني وهو عنوان خادم مایکروسوفت ) (Microsoft Symbol Server‏ هو تمکیين المستخدم من القيام بعملية تنزيل مره ة واحدة لجميع 
الملفات الخاصة بالمجمعات المستعملة من طرف المشروع (كما شرحنا في فقرة للمستخدمين المتقدمين) و الهدف هو تسريع العملية أكثر بالبحث 


عن معلومات الملف من المصدر الأول و من ثم تنزيله من المصدر الثاني ... قم بإضافة عنوان الموقع إمإءS‏ 1مطصر؟ اÊfمومإءMN‏ إلى قائمة 
المصادر - كما يظهر في الصورة - ومن ثم قم بترجمة المشروع و عند الانتهاء قم بنز ع العلامة صح من على مصادر التنزيل 


عليك أيضا أن تعرف أن وجود مصدرين مختلفين سيولد مشاكل في حالة أن أردت أن تقوم بعملية تحديث (لمجلد ملفات الم في القرص الصلب) 
بتنزيل ملفات جديدة لمشروعك لان بيئة التطوير ستواجه مشاكل وخلط بين المصدرين» لذلك يحبذ حذف المصدر الثاني. 


Environment 


Performance Tools | Using symbol files from an unknown or untrusted location can be harmful 
Projects and Solutions to your computer. 


Surce Control 
Text Editor Symbol file (pdb) locations: اشا ااه‎ 


Database Tools 
1 ا‎ f referencerource microsoft.com symbols 
Debugging I iI e Frill 
er http: Ff rmsdlrmicresoft. t.com/download/symbels) 
Edit andl Contiriiê 
Just-In= Tirê 
Natrie 


kache symbols from symbol servers to this directory?‏ ر 


HTML Designer ڃ‎ A\Users\sburke\Symbols 


Gfficê Tools 

Test Tools 

Text Templating 

Windows Forms Designer 
__ Workflow Desianêr 


Search the above locations only when symbols are loaded manually 


Load symbols using the updated settings when this dialog is closed 


vbêarab corm 


إعداد الفيجوال ستوديو لتنقيح الشفرات المصدرية لإطار عمل .نت 


5/ هل تعول هذه الميزة وع النسخة خ1ة-64؟ 


نعم» لقد وفرت مايكروسوفت أيضا للنسخة زط 64 ملفات ال ۶58s‏ وهي في مجملها تدعم في نفس الوقت جميع أنواع البنيات التحتية 
و لا تحتاج لوجود نسخ منفصلة لكل بنية. 


6/ كيف لي أن أضع نقطة توقف داخل شفرة للفريم وورك .نت؟؟ 


نعم يمكنك ذلك» قم بوضع نقطة توقف عادية داخل الشفرة » بعدها اضغط عليها بزر الفأرة الأيمن و اختر ودهع[ من القائمة المنسدلة كما في 
الور الال : 


[Gublic System. Drawing. Graphics Graphics { 
qet {f 
3 if (graphics = nul1 s&s de != IntPtr.Zero) { 
oldPal = Control. SetUpPalette (dc, false /*force*/, false #/*realize*™*f}?; 
qıraphics = Graphics . FrcoamHizlIlntercnal [ûc] ; 
qraphics . PagqeUnit = GraphicsUnit . Pixel; 


zaayedGraphicsState = graphicsz.Save [j]: // See ResetGraphics (J) below 


lfeurn Jqraphics?; 
ond... 
Hit Count... 


Break execution when the program reaches this location In a file, 
File SindpifAsre\WinForms\Managed\System\WinForms\PaintEvent.cs\1\PaintEvent,cs 
Line: 


Lharacter: 


سترى أن النقطة تعمل بصورة طبيعية. 


إذا كنت تستعمل هذه الميزة بصورة متكررة»ء قم بنزع العلامة صح من مام lخlıر “Require source files to exactly match the‏ 
origina version.”‏ الذي تجده في تبويب ع ذععںطاع5 من نافذة الإعدادات الخاصة ببيئة التطوير (Tools->Options->Debugging)‏ 


7/ لماذا لا تعول بعض الذدوات مثل "۴۸1۲101۸ "6o 10 0e‏ رع شفرة للدوت نت؟ 


ان عملية التنقل من المتغير الى مصدر تعریفه داخل شفرة عادية تتخل عن حالة الشفرة المصدرية في الدوت نت لأن المعلومات 
فية عن المتغيرات مثلا غير موجودة في ملف ال ۲08 لأنها تستعمل أثناء عملية ترجمة المجمع و تنفيذه. 


۳” چ‎ 
vbêarab.corm 


اعداد الفيجوال ستوديو لتنقيد الشفرات المصدرية لإطار عول .نت 


8/ لماذا بعض العناصر (خصائص أو طرق) أو بعض المتغيرات المحلية غير ظاهرة أثناء عملية التنقيح؟ 

بتات -و)8- الملفات ال[[ الأخاصة بمجمعات مكتبات إطار عمل الدوت نت إل قمت بتتبيتها عام جهازك هي في الحقيقة مجزئة» و 
هذا يعني أنها مجز ئة لتحسين الكفاءة بتقليل المساحة المحجوزة. جزئ من عملية زيادة الكفاءة يتطلب حذقف يعض المعلومات من ال Process‏ 
الورك ق لكر الى تقل قات هه المحمات) و الت ا حا نا إن عل فح هف اعات المجكرة تقار 


E E‏ 0 ا ا ا و 


بعض ملفات الشفرات كبيرة جدا - حوالي 1 ميغا - وهي الملفات الضرورية في معظم الحالات للأسف. 
10/ هل أستطبع تنزيل جميع الشفرات مرة واحدة؟ 

حتى الأن غير ممكن» لكن العمل جاري على قد وساق لتوفير هذه الإمكانية مستقبلا. 
11/ عندما أقوم بتنقيح شفرة بلغة الفيبي. متلا تنقيح المجوع V1su2a18 21٤٥.11‏ .ا؟Microso‏ اجد تعلیقات فی 
الأسفل مكتوبة بلغة السي شارب. هل هذه شائبة (خطا) ؟ 

ليس كذلك» في الحقيقة أثناء قيامنا بنشر الشفرات و إضافة تعليقات حقوق النشر إليها في أسف الصفحةء كان مولد الشفرات في ذلك 
الوقت لا يدعم توليد شفرات مكتوبة بنسق لغات مختلفة في نفس الوقت. 


2/ لقد قمت بالدخول إلى ملف الشفرات وكل ما قد قمت بتنزيلہ كان ملفا فارغا؟ 


لقد رأينا هذا الأمر من قبل بشكل متقطع و لم نبحث في أسبابهء إذا رأيت نفس الشيء فالحل هو إعادة تشغيل الفيجوال ستوديو ليقوم 
بإعادة تنزيل الملف أرجو أن تراسلنا (فريق التطوير الخاص بإطار العمل) مع إعطاء الاسم المعطوب و تاريخ حدوث الخلل. 


3 / اا الذی سیحدث إن قمت بتنزیل ملف تصحیح (×101۴1]) أو حزوۃ تحدیث zk٤ھم‏ ع٤cذvامs؟‏ ھل استطیع 
أن اشاھد الشفرات الخاصۃ بہ؟ 


لقد قمنا ببناء نظام يمكننا من توزيع نسخ متعددة من شفرات خاصة بمنتج (حسب نسخته)» ولم نتخذ أي قرار حول كيفية توزیع هذه . 
النسخ وهي اقتراحات مفتوحة للمستعملين و المبرمجين. مثلاء CC o Ce‏ 
صعب بعض الشيء في اتخاذ قرار حول وضع شفرة خاصة بكل عملية تصحيح» ولا نزال في حاجة إلى اقتراحات أو أي ملاحظات. 


تصحيح (×10†۴1]]). في هذه الخالات» نافذة ال وماuںله"‏ التي تكلمنا عليها سابقا ستخبرك بأن عملية تنزيل ملف ال P58‏ الخاص بالمجمع غير 
ممكن., بافتراض أن نسخة جديدة من هذه الملفات تم نشرهاء سيتعين عليك إعادة عملية التنزيل من جديد. 
14/ هل أستطيع أن أدخل من المتصفح إلى موقع تنزيل ملفات ال ۴08 و أقوم بتنزيل الملفات يدويا؟ 


لا تستطيع» وستظهر لك رسالة الخطÎ‏ اlتıllة:)Request HTTP 400 (Bad‏ 


vb4arab.corm 


3 1 اا 
Microsoft Technologies & E :‏ 


تطالعون في هذا العدد... 


اوتحان شهادة المحترف من وایکروسوفت MCP‏ 
يعد هذا الامتحان البوابة الرئيسية التي ا IH"‏ 
علی کل ورشح أن یسلکہ من أجل 2 1 2 E‏ 


الوصول إلى باقي الشهادات التي r‏ 
توفرها مايكروسوفت و التي تزن قيمة كبيرة جدا في سوق البروجيات. ولید بوالطمین. وصطفی 
للحصول على شهادة ال M٣۳۲٣‏ على المترشد اجتياز امتحان واحد على الأقل مون روود 


بين موجموعة من الامتحانات الوعرفة برقم تسلسلي خاص بكل واحد.. 


آدوات و تقنیات مایکرود 0 


وراسل الووقع ون الرياض 
تتوة صفحة 100 Maxima‏ 


لعل الکثیر منکم لا یعرف مہا هو ال ٥ ٣٥×‏ d٥عC_حتی‏ الان 


lexزCodep Microsoft‏ مو عبارة عن موقع لوایکوسوفت 
للتعامJ OpenSOoUurCcC@eJl z2,‏ . 


تستطيع أن تصنع برامجك الجديدة وتشارك بها على الموقع 
تستمع إلی اراء المبرمجین الذخرین, وتسمح لھم باستخدامہ للتطویر فیہ 
وعول إضافات أآخري, وأنت أيضا تستطيع أن تاخذ البرامجح الموجودة 
علیہ لتطویرھا أیضا. 


في التونة الأخيرة أصبحت ميكروسؤفت _تهتم بال 0٥۸‏ 
Source‏ عا سبق وقد سمعتمر أن الشفرة الوصدرية لإطار عمل 
الدوت نت أصبحت مفتوحة للقراءة . 


_ آخبار مایکروسوفت 


ا3 


اوتحان شهادة الوحترف ون وایکروسوفت °° ×٥×‏ 


ولید بوالطمین. مصطفی محمود ‏ 


7د . 

يعد هذا الامتحان البوابة الرئيسية التي على كل مرشح أن يسكه من أجل الوصول إلى باقي الشهادات التي نئ ع۴ | ٣|۴٣‏ ۴8 0© 
توفرها مايكروسوفت و التي تزن قيمة كبيرة جدا في سوق البرمجيات. = ت 
للحصول على شهادة ال N٣۴‏ على المترشح اجتياز امتحان واحد على الاقل من بين مجموعة من 
ااا لبرہ ورک کسی اص گل و اک 

وهذه هي الأمتحانات التي يمكن لك أن تجتازها؛ 


› 70-222 70-221 70-220 70-219 70-218 70-2174 70-216 70-215 0-214 70-210 70-086 70-05770-6 
70-< 70-270 70-244 70-234 70-232 70-230 70-229 70-228 70-227 70-226 70-225 70-22470-3 

› 70-297 70-296 70-294 70-293 70-292 70-291 70-290 70-285 70-284 70-282 70-281 70-71 
70-320 › 70-316 70-315 70-310 70-306 70-305 70-300 70-299۰70-98 


وهي امتحانات متنوعة ولا يشترط أن يكون المترشح مبرمجا للحصول عليها و هي تخص في مجملها التقنيات التالية: 


-.NET Framework 

- BizTalk Server 

- Commerce Server 

- Exchange Server 

-ISA Server 

-Operations Manager Site Server 
-Small Business Server 

-SQL Server 

- Systems Management Server (SMS) 
- Windows 2000 Windows NT 

- Windows Server 2003 

- Windows XP 


الامتحان : 
1/ التسجيل: 
عملية التسجيل تتم في المراكز المعتمدة من قبل مايكروسوفت في بلدك (راجع موقع مايكروسوفت لمعرفة المراكز المعتمدة في بلدك) 


و هي تتطلب مصاريف تختلف بحسب المركز و لكن لا تتجاوز ال 100 دولار في أغلب الأحيان) عليك البحث عن المركز المعتمد الذي يقدم 
الخدمات الأرخص - بعض المراكز تقدم أسعار جد مغرية- 


يستفيد المرشح من دورة تدريبية مكثفة قبل اجتياز الامتحان و مدتها تختلف من مركز إلى مركز كما يمكن للمرشح أن يجتاز الامتحان دون 
في مكان أخر يمكنك حتى إن تؤدى كل امتحان في مكان إذا أردت. 


يمكنك أن تدرس الدورة في مركز تعليم أو تقوم بقراءتها من الكتب المتوفرة هنا وهناك أو تستخدم أي أسلوب تشاء المهم الحصول على 
المعلومات. 


يمكنك مراجعة الدورات التي توفرها مايكروسوفت وامتحاناتها وكل ما يتعلق بها في قسم الشهادات و التدريب في موقع مايكروسوفت. 
2/ الذهاب لحجز الامتحان 


تقوم بالذهاب إلى مركز الامتحانات المعتمد الذي تريد أداء الامتحان فيه وتقوم بإعطائهم رقم الامتحان والميعاد الذي تريد 
أن تؤدى الامتحان فيه. 


منذ هذه النقطة انت کے٠‏ لحقيقة تتعامل مع 3 شركات 


١ 
ل‎ 
4 . 1 ا‎ BI SS FI 1 i Ea "8 | 1 


س ن 


للوشاركة أو الاستفسار زوروا ووقعنا على النت ١0ء.طaإ4aطvb O O ET‏ 


اوتحان سهادة الوحترف من وایكروسوقتP M٣٣‏ 
ولید بوالطمین. وصطفی موحوود 
شرکة مایکروسوفت )گ0s0Ê‏ ]۷11 وهی الشركة التي تقوم بعمل الامتحانات وبيعها 
شركة بروماتريك ءإاة ١٠م‏ وهى الشركة الوحيدة التي تتعامل معها مايكروسوفت الأن لتوصيل امتحاناتها حيث تقوم بتأدية 
الامتحان ت مركز الامتحانات Testing Centr‏ المعتمد من هذه الشركة في بلدك. 
الشركة التي ستؤدى الامتحان فيها وهذه هي الشركة التي تتعامل معها مباشرة والتي يوجد فيها مركز الامتحانات المعتمد من 
بروماتريك. 
عند حجز الامتحان سيطلب منك ملأ استمارة تحتوى على معلومات متل الاسم والتليفون و.... 
ولكن بالنسبة للعنوان يجب كتابته بدقة لأن الشهادة سترسل إليك عن طريقه أو يمكنك تغييره لاحقا كما سنرى. 
البريد الالكتروني يجب كتابة البريد الذي تستعمله لأنه سيتم إرسال رسائل لك على هذا العنوان. 


3/ التحضرر للامتحان: 

إذا سجلت في مركز معتمد و دفعت نفقات التسجيل كاملةء ستستفيد من دورة تدريبية مكثفة قبل اجتياز الامتحان» و مع ذلك عليك التحضير 
بمفردك باستعمال الكتب (راجع مكتبة الموقع - قسم التحضير لامتحانات الشهادات الدولية - ) أو باستعمال برامج التحضير أو بعض مواقع 
الانترنت. 

هذه بعض البرامج المشهورة للتحضير: 


WWW.V11Wa1e.com gعقوملا تجدونە على‎ mwa 


Vısual Cert Exam Suite manager 


وكلها تعمل بمبداً الملفات الجاهزة الى تحتوي 2 الاس المدة اللازمةء الإجابات 1 د أصحبحة اسم الامتحان أي أنه عأيك ن تعطي للبرنامج 
الملف الذي يحتوي علي معلو مات الامتحان. 
بعض المواقع المفيدة: 


www.certifexpress.com 
www.Ccertiffiles.cOom 


WWW.CErtexams.cOmMm 
www.microsoft-certif1catlon-exam.Org 


4/ الاوتحان: 


الامتحان في مجمله يتطلب من ساعتين إلى أربع ساعات حسب نوعه»ء و عليك أن تحصل على نقطة تعادل 55 إلى 100/75 (حسب 
نوع الامتحان) من إجمالي الإجابات حتى تعتبر ناجحا. 
الأسئلة عبارة عن أسئلة خيار واحد أو متعدد (Q٣٤M؛ )5S٤0Q‏ و عليك أن تختار الإجابة (الإجابات) الصحيحة من بين الأجوبة المقترحة. 
ستستعمل حاسوب مزود ببرنامج الامتحان. 
الأسئلة كلها من نوع ( اختر الإجابة الصحيحة ) ولكن هناك أنواع لهذا السؤال 

اختر الإجابة الصحيحة من الإجابات. 

اختر عدد من الإجابات يقومون بتحديده (بحيث تكون كل إجابة منهم تمثل حلا للمشكلة). 

اختر (عدد من الإجابات يقومون بتحديده) بحيث تكون كل إجابة جزء من الحل. 


اختر جميع الإجابات الصحيحة. 


تقوم بالتعليم على الإجابة التي تختارها في 0اط مالعا أو ×0ط )ععطع حسب نوع السؤال» للتدريب على الأسئلة 
يمكنك استخدام امتحانات test king‏ ولکن لا تعتمد علیها فقط عليك بالمراجعة الجيدة 


هذا الموقع يحتوي على امتحانات مجانية يمكنك تنزيل ما تشاء http :I//www.examcollectio0¬.c0N/‏ 


EBI 


للوشاركة أو الاستفسار زوروا موقعنا على النت _٣0ء.اvb42۲a‏ العدد 01 لشهر يناير / فبراير من سنة 2008 


اوتحان شهادة الوحترف ون وایکروسوفت °° ×MN‏ 


ولید بوالطمین. ومصطفى وحمود 
الوسائل المتاحة خلال الامتحان: الرجوع Review‏ 


هذه الوسيلة تمكنك من تعيين الأسئلة التي تريد الرجوع إليها لمراجعتها إن كنت تشك فى إجابتك و ننصحك باستعمالها لربح الوقت. 
ا 


- عليك بقراءة الإجابات المتوفرة للسؤال المطروح قبل رؤيته ثم قم بقراءتهء هذه الطريقة أثبتت جدارتها حيث أنها تمكنك من معرفة السؤال 
ا 


- بعد قراءة السؤال عليك الانتباه إلى التوجيھات "Best Choice"‏ و "with the least administrative effort"‏ التي تساعدك علی 
معرفة نوع الإجابة و في بعض الأحيان عدد الإجابات الصحيحة. 


- دع الأسئلة التي تشك فيها لل سع ز۷٥‏ ۸حتى لا تضيع الوقت كثيرا. 


- بعل الإجابة على جميع الأسئلة و الضغط على زر End Exam‏ ( تظهر لك قائمة بها جميع الأسئلة و بجانبها علامة صح للأسئلة التي أردت 
أن تدعا Review .Ji‏ 


ol mc E EN LD a E 
بعد الانتهاء من الامتحان ستتسلم تقرير وهو يحتوى على عدة أشياء‎ 


1. أولا البيانات الخاصة بالممتحن متل الاسم رقم الامتحان النتيجة 15 عاهولنلمه٤‏ وبما أن هذه أول مرة تمتحن (إن كانت المرة 
الأولى التي تجتاز فيها امتحان من امتحانات مایکروسوفت) ستجد مکتوب بجوارها چہال,ء۲۴ 5] هذا هر 15 M٣۴‏ ولكنك لم 
تحصل علية بعد. 
ثانيا مجموعة رسومات تبين مدى إتقانك لعناصر الامتحان حيث يتم تقسيم أسئلة الامتحان إلى عدة عناصر أو مجموعات رئيسية 
ويتم إعطاءك تقييم لكل منها. 

3 ثالثا صفحة أخرى بها بعض الأشياء عن الامتحان ومزايا الحصول عليه. 


إذا نجحت فماذا ستجني؟ 


إذا نجح المترشح في أحد الامتحانات فإنه سيحصل على صندوق به شهادة وبطاقة بها سنة الحصول على الشهادة و الرقم التسلسلي 
للناجح N۳۴15‏ و الذي ستحتاجه للدخول إلى الموقع الخاص بال M٣۴١‏ الذي يحتوي على آخر المعلومات عن تقنيات مايكروسوفت و 
العروض الجيدة و الخدمات المتوفرة. 


الشهادة لها قيمة ووزن ثقيل في السيرة الذاتية لصاحبها حيث تزيد في فرص التوظيف في الهيئات المختلفة. 


للمشاركة أو الاستفسار زوروا موقعنا على النت ص٣٠c0ء.vb4arab‏ العدد 01 لشمر يناير / فبراير من سنة 2008 


اوتحان شهادة الوحترف ون وایکروسوفت ° ×M°٥°‏ 
ولید بوالطمین. وصطفی وحمود 
كيفية طلب الشهادة: 


لتحصل على الشهادة يجب أولا طلبها من موقع M٣۲‏ كيف ؟؟؟ 
يجب عليك دخول موقع مء ولكن دخول الموقع ليس بهذه البساطة 
لدخول الموقع لأول مرة يجب أن تكون معك 3 أشياء 


1- Windows Live e-mall 
2- MCP ID 
3- Access Code 
windows live e-mall -1 


ادا کان لديك أی درد 2 windows live ‘hotmail ‘+ msn‏ يمكنك استخدامه مباشرة أما ذا کان البريد الذي ترید التسجيل به ایج 
ياهو مثلا ستجد الخيارات لاستخدامه وستستخدمه بلا مشاكل أنا متلا بريدي على ياهو وأقوم باستخدامه للتسجيل في مواقع مايكروسوفت . 


MCPID -2 


لنتفق أن هذه أول مرة تؤدى امتحان فيها إذا ليس لديك 14 بعد وتريد معرفته في التقرير الذي ستستلمه بعد الامتحان في الصفحة الثانية 
ستجد موقع الشركة التي امتحنت فيها وهى بروماتريك وستجد بعض الروابط الأخرى الخاصة بالتسجيل في موقع الشركة على شبكة الأنترنت. 
قم بالدخول إليها سيطلب منك بعض المعلومات هذه المعلومات موجودة في التقرير مثل «0اهإءزعمR‏ و 10اه ل1إه۷ وهي أرقام موجودة 
في التقرير» ستقوم بكتابتها وستظهر لك صفحة تحتوى على اسمك واسم الامتحان والنتيجة ووه لا يوجد النتيجة كأرقام فقط ناجح ورقم 
Candidate 1D‏ هذا هر 1۲ ٣۲‏ وهو يحتاج حتى 7 أيام لتحصل عليه في هذه الأثناء سيأتي لك على البريد الذي قمت بكتابته في مركز 
الامتحانات بعض الرسائل من مايكروسوفت و بروماترك وهى رسائل استطلاعات للرأي حول الامتحان وبعض الأشياء الأخرى. 


Access Code -3 


ستقوم بطلبه من الصفحة التي تقوم بالتسجيل فيها للدخول على الموقع و سيتم إرسال رسالة لك على البريد الذي قمت بكتابته عند التسجيل 
في هذه الصفحة هذه الرسالة تحتوى على رقم مله sوعءءء۸‏ وهو صالح لمدة 15 يوم أو حسب ما يقول لك قم بنسخة وكن حذرا عند لنسخ 
حيث لا تقوم بنسخ مسافة قبل الرقم أو بعده قم بتحديد الرقم فقط . 


بعد كل هذا ستتمكن من الدخول على موقع مء ستجد في هذا الموقع أخبار عن الشهادات الجديدة وعن التحديثات وستجد قسم للشهادات 
دتمل ها الق لطب انها د النكرل كه دته اك ر اران ران ااملن الى كه تو اح رت كر الصف مد ر اا 
ا د ا عا E‏ را رك ا انت کر الل ای اارمل لے لون اکب ق 
بعدها تنتظر من 4 إلى 6 أسابيع حتى وصول الشهادة يمكنك أن تدخل على موقع مء بعد ذلك باستخدام البريد وكلمة السر الذي قمت بكتابتها 


EBI 


للوشاركة أو الاستفسار زوروا موقعنا على الت ٣0ء.اaاvb4a‏ العدد 01 لشهر يناير / فبراير من سنة 2008 


خلاصۂ ووتور MS Dev Stay ahead‏ بالریاضشش 
وراسل الووقع ون الرياض 


Maxima 
MS Dev Stay ahead يوم الاثنين الموافق 2007/12/3 بفندق الماریوت بالریاض کان یوم مایکروسوفت والمسمى‎ 


الخضرر کان کر کا فعا ار على لظم ویرا على ماگروسرف عد أخقار ها اكان النناس لدد ذا ك تغرف وتات اى 
سيتم شرحها وعرضها في هذا اليوم والتركيز كان على منتجين 


الأول 

MS expression 

وهو عصارة أفكار مايكروسوفت لخدمة مبرمجي الويب والتطبيقات ويأتي بعدة تطبيقات. 
MS expression Design‏ 


واجهات وتوفير أدوات رائعة لعمل واجهات رهيبة وإنشاء ملفات ×۸١‏ والشيء المميز في هذا المنتج انه يتعامل مباشرة مع ملفات فيجوال 
ستو ديو . 


MS Expression Web 


وهو التطور الطبيعي للحاجة الساقعة قصدي للفرونت بيج ويدعم أدوات تطوير رائعة مثل تقنية الاجاكس و R88‏ ودعم ملفات H111‏ و 
ASP.NET yXHTML‏ و XML‏ وغیرها الكثير من الأدوات والدعم أبناء صفحات ويب متطورة وتفاعلية. 


MS Expression Media 

وه ناء صتخات ادراش مات الها و تدر ها لهات الريت مها 
MS Express1ion Blend‏ 

وهو لتصميم برامج الملتميديا - حسب ما فهمته - ولإنشاء كود ۸1× بسهولة . 


Expression Encoder چaliرڊ استخدم‎ Sil verligh) ولإنشاء ملفات‎ 


طبعا ٤ع S11۷]:‏ هو المنافس لمنتج طوه۴1 من مايكروميديا سابقا وأدوني حاليا 
المنتج الثاني فكان حبيب المبرمجين فالفيجوال ستوديو 2008 


وأهم مزاياه التي تم شرحها كانت إمكانية إدارة فريق من المبرمجين لمشروع ما وإمكانية التكامل مع برنامج مايكروسوفت بروجكن لسهولة 
إتمام مشروع ما 
وتبسيط هذا الإصدار كثيرا عن الإصدار السابق. 


لا أنسى أن اذكر انه كان هناك العديد من الجوائز عند الإجابة على بعض الأسئلة أثناء المحاضرات وكان في نهاية اليوم سحب على اكس 
بوكس 360 . 


أتمنى من الجميع عدم تفويت حدث مثل هذا مستقبلا وأعتقد بعد شهرين سيكون يوم تعريفي ببرنامج مايكروسوفت 4 K8M‏ لإدارة علاقات 
العملاء لكن لم يحدد اليوم بالضبط. 


للوشاركة أو الاستفسار زوروا موقعنا على النت _٣0ء.اvb4a۲a‏ العدد 01 لشهر يناير / فبراير من سنة 2008 


قواعد الببانات العام 


Data Base Programmi 


تطالعون في هذا العدد... 


الجبر العلائقي وجمل الاستعلام في 1١؟‏ 
تعتمد لغة الاستعلام البنيوية في استرجاع البيانات على قواعد ومفاهيم الجبر 
العلائقي وسنتعرض في هذا الدرس إلى أهم هذه المعاملات و أكثرها استخداما املا أن 
يقدم هذا الموضوع الإجابات الشافية لاستفسارات الأعضاء حول هذا الموضصوع... ا 


INSERT Statement 


أحود بدر 
BADRMEDIA‏ 


الجبر العلائقي وجول الاستعلام فى أ¶ة 
تعتمد لخة الاستعلام البنيوية في استرجاع البياتات على قواغد ومفاهيه جيب المجيدي 
الجبر العلائقي وسنتعرض في هذا الدرس إلى اهم هذه المعاملات ر أولاً وعاول الاتحاد 10۸ہ ل : 

أكثرها استخداما آملاً أن يقدم هذا الموضوع الإجابات الشافية 

لاستفسارات الأعضاء حول هذا الموضوع. 


وبداية دعونا نلقي نظرة على جملة ا8 


قواعد السانات 


کود: 
SELECT *‏ 
FROM Table‏ 
WHERE Condition‏ 


تتكون جملة الاستعلام النموذجية من: 


© لکلمھہ لوحجوزه 8 » » فر 2 ٩‏ » |« 5 
SELECT 1‏ يمثل الجزء المظلل هي الشكل السابق ناتج الاتحاد بین 
ا 1 المجموعتين ويستخدم التعبير التالي لتمثيل ما سبق عن طريق اه8 

E NEE o CS 

ا ا و ل ا ا ا د ا GETS‏ 

و ر - : المجموعتين مع حذف التكرار. 


الضف اخ 
2. الكلمة | FROM ãj‏ 
کود: 
و تتبع باسم الجدول المراد استرجاع البيانات منه. 
3. الكلمة lلويحجãja WHÊERÊ‏ فإذا كان لديا ائجدjılg Teachers‏ ڃ Students‏ ` 
‘Teachers‏ 


و تتبع بالشرط الذي يحدد السجلات التي سيتم استرجاعها. 


فإذا كان لدينا الجدول التالي باسم s٥٥yهامEmp‏ 


F_Name 


وأردنا استرجاع الاسم الأول و الثاني للموظفين الموجودين في عدن 3 
سنكتب التالي: 
کود: 
e a f SELECT F_ Name, L_Name‏ : 
Employees‏ 0م | الەرص في مثالنا هذا ان الطالب ١مم camer A۸‏ يدرس هي 
ز' NERE City=' Aden‏ | المستوى الآخير و هو مدرس في نفس المعهد فإذا اردنا معرفة جميع 
حسنا , دعونا الان نبدا بمعاملات الجبر العلائقي التالية: الطلبة و المدرسين لدينا سنقوم بكتابة الاستعلام التالي: 


1. الاتحاد Union‏ کود: 
2. llتlaطg SELECT F_Name, L_Name Intersection‏ 


FROM Teachers Difference Jرفلا‎ .3 
UNION 


٤ :‏ : م ا SELECT F_ Name, L_Name‏ 
رالمعاملات بشتر ط أن تتشابه الکائنات ف صفاتها أى أ Name, L_‏ 

2 ا د ڪا ا FROM Students‏ 
يجب أن تحمل نفس نوع البيانات كما يجب أن 


ل في جملتي الاستعلام. 
vb4arab.corm‏ 


قواعد الببانات 


الجبر العلائقي وجمل الاستعلام فی }د 


نجيب المجيدي 

كما هو واضح في الشكل السابق, يقرم هذا المعامل بإرجاع الق 

کا ی او اواو ی ا 
الثانبة. 

ا 

ا 

Taher‏ كود 


Waleed Taher 
<SOL QUEEYyL> EXCEPT <SOL GUEEY2> 


وعند تنفيذ الاستعلام التالي: 


لاحظ أن السجلات المكررة تم حذفها. 


کود: 
SELECT F_Name, L_Name‏ 


FROM Teachers : Intersection _gۆlڙتll‎ Jolعو ثانیا‎ 


BHAGEE JL 


SELECT F_ Name, L_Name 
FROM Students 


سيتم إرجاع سجل واحد يمثل , a6۲‏ d4ءءاWa‏ وهو السجل 
الوحيد الموجود في الجدول الأول و غير الموجود في الجدول الثاني 


الآن سنمر على طرق الاستعلام التالية: 


وكما نلاحظ في الشكل السابق وبعكس معامل الاتحاد فإن معامل أ الخضر العودى 

التقاطع يرجع السجلات الموجودة في كلا المجموعتين ( الجدولين ). 2- الحصر الأفقى ` 

A EN‏ 3- الربط 0۱ل 

0 وبالنسبة لأول معاملين سيكون مرورنا عليهم سريعاً لكونهما بديهيين 


>S01 duery1< INTERSECT <SOL query2>‏ | في جمل الاستعلام... 


| العوود 
و عند تنفيذ الاستعلام التالي 
کد وهو ببساطة تحديد الأعمدة المطلوب الاستعلام عنها فقط بدلا 
SELECT F_ Name, L_Name‏ من استرجاع اعمدة الجدول بالكامل 


FROM Teachers 
INTERSECT 


کود: | 
SELECT * SELECT F_ Name, L_Name‏ ) 
FROM students ERM SEUISRES‏ 
ستقوم هذه الجملة بإعادة جميع حقول الجدول , كأ عك لاء ولكن إذا 
: أردنا تحديد أعمدة معينة فإننا سنقوم بيساطة بذكر هذه الأعمدة بعد 
مه ل خا الد ر ب ۱ » »* ۱ قت r ٤‏ . . 
ستظهر النتيجة ص الذين يدرسون في المعهد و في تفس الوق إلكلمة المحجوزة 81-٤٥1‏ كما يلي: 
يعملون كمدرسين فيه وفي حالتنا فإن النتيجة ستحتوي على سجل 
واحد يمثJل „Ahmed sı Samer‏ ڪود: 


SELECT F Namê; Class 


FROM students :Diffrenece وعامل العرق‎ IG 
هذا سيعيد إلينا فقط سجلات عمودي الاسم الأول و الصف‎ 


الأذت 


I Cm 


نحدد السجلات المطلوبة و بالتالي فإن النتيجة ستحتوي على جميع 
ت الجدول 


فإذا أردنا تحديد سجلات معينة ( وهذا هو ما يدعى بالحصر الأفة 
فإننا سنستخدم الكلمة المحجوزۃة N۷] ٤۴‏ بعد اسم الجدو 
نلحقها بالشرط المطلوب لتحديد السجلات كما يلي : 


vb4arab.corn 


الجبر العلائقي وجول الاستعلام في أ4 
کود: 


SELECT F_ Name, Class 


FROM students 
WHERE Class = 1; 


]01N الربط‎ 


يستخدم الربط لاسترجاع بيانات من جدولين وسندرس ثلاث 
حالات للربط 


أولا الربط الداخJlى INNER ][OIN‏ : 
ا 
کود: 
flield3‏ 


SELECT fieldl, field2, 


FROM first_ table 


TNNER JOIN Second table 
ON first_tLable.keyfield = 
second_table.foreign_keyfield 


ويقوم باسترجاع جميع السجلات في الجدول الأول المرتبطة بسجلات 
الجدول الثاني مثال 


کود: 
SELECT Employees. F_Name,‏ 
Orders.Product_Name‏ 


FROM Employees 
INNER JOIN Orders 
ON Employees. ID=Orders. EmpID 


حيث أن حقل 0| هو مفتاح أساسي في جدول الموظفين و 
حقل (|م" ع هو مفتاح أجنبي في جدول الطلبات 
ستكون النتيجة عبارة عن اسم الموظف و المنتج الذي قام بطلبه» و 
سيظهر الموظفون الذين قاموا بطلب شيء فعلا فقط , أي وكما قلنا 
سابقا ستظهر السجلات التي لها ارتباط بالجدول الثاني فقط . 


تانڀا الرıفظ‏ lلئwyqر :LEFT [OÎN‏ 
الصيغة العامة 
کود: 
flield3‏ 


GELECT ELolLOLy, EILeIlded, 


FROM ELIESL lable 

LEFT JOIN second_table 

ON first_table.keyflield = 
second_tLable.forelgn_keyfield 


وعند الربط بهذه الطريقة يقوم الاستعلام باسترجاع سجلات الجدول 
ES E‏ 

مثال 

کود: 


SELECT Employees. F_Name, 
Orders.Product_Name 

FROM Employees 

LEFT JOIN Orders 

ON Employees.ID = Orders.EmpID 


vb4aarab.cormn 


قواعد الببانات 


وهنا سنلاحظ في النتيجة أن سجلات جدول الموظفين موجودة 
بالكامل , بينما حقل ۳٥‏ N2_اعuكr0ام‏ يظهر اسم المنتج في 
السجلات المرتبطة و يظهر فراغ بالنسبة للموظفين الذين لم يقوموا 
بطلب منتج ( بمعنى أن هذا الحقل سيظهر فقط السجلات المرتبطة 
من الجدول الثاني ). 


: RIGHT JOIN i 


ئل الربط ال 
الصيغة العامة: 
کود: 


GELECT TIC L, TIGL, TIELOS 


FROM first_table 

RIGHT JOIN second_table 

ON first_table.keyfield = 
second table.foreign keyfield 


وبعكس الربط الأيسر, يقوم الربط الأيمن بإعادة جميع سجلات 
الجدول الثاني حتى تلك السجلات الغير مرتبطة بأي سجل من 
الجدول الأول, بينما يعيد السجلات المرتبطة فقط من الجدول الأول , 

قم بتطبيق المثال السابق مع تغير RIGHT J| LEFT JOIN‏ 

0ل لتری الفارق. 


اخترنا لك من وكتبةۃ الشسفرات ... 


SELECT DISTINCT 


الصيغة آ٥0|8۲|N‏ اسم على مسمی تستخدم لاسترجاع القیم 
المختلة فقط., 

إذا كنا نريد استرجاع القيم المختلفة فقط من جدول نحتاج إلى إضافة 
صغ SELECT Jl! DISTINCT‏ 

السا اليا 


کود: 
SELECT DISTINCT Column, Namie (S)‏ 
FROM table name‏ 


لاسترجاع أو الاستعلام عن جميع أسماء الشركات من الجدول 
Orders‏ 

ستكون الجملة كالآتي: 

کود: 


SELECT DISTINCT COMMON 
FROM Orders 


E 


INSERT Statement 


هل أنت مبتدأً لا تستطيع التعامل مع قواعد البيانات ؟ 


ستكون بهذا الشكل 


1 


د 


(COLL, COL SS) 


(valuel, value2...) 


LNSERT. INTO: tablë._ Hame 
VALUES 


E+ 


ل 

جدول اسمه م" فيه هذه الحقول 
0| حقل رقمي 

Name‏ حقل نصي 


1 


د 


INSERT INTO Emp (ID, Name) 
VALUES (l1l, 'BADRMEDIA') 


طبعاً الحقل الرقمي يوضع مباشرة والحقل النصي يجب أن نضعه بين 
علامتين تنصيص مفردة. 


الخال السا مك تخ ها الكل : 


1 


د 


INSERT INTO Emp 
VALUES (l1, 'BADRMEDIA') 


بعاً وجدنا أن اسم الحقول المراد إدخال البيانات لها غير موجودة. 
صحيح ممكن نرسل القيم مباشرة في جملة الإضافة كما رأينا لكن 
بشرط أن القيم المدخلة تكون مرتبة بترتيب الحقول في الجدول. 
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LINSERL < VAbBUES 


LNSERLT ss 2 ELEGL 


قواعد البيانات 


BADRMEDI1A ڊدر‎ دgحİ‎ 
INSERT....SELECT Statement Auنlûll‎ Aۃغصلا‎ 
الطريفة الثانية ستكون صيغتها بهذا الشكل‎ 
کود:‎ 
INSERT INTO: Emp: (ID, Namê) 


SELECT ID, Name FROM Student 
مثال‎ 


جدول اسمه م E"‏ فيه هذه الحقول 

0 حقل رقمي و 4۳06 حقل نصي 
وجدول آخر اسمه ٤٣6ل‏ ں8 فيه هذه الحقول 
0 حقل رقمي و 4۳6 حقل نصي 
الجدول 46۸ ں]S‏ فيه هذہ القیم 


Name 


Samir 


INSERT INTO Emp. (LID, Name) 


| SELECT ID, Name 
FROM Student 
ESTEE A EVAN EEE 
لا تضیيف إلا سجل‎ |5٤۸۲ ل۷۸1...‎ ٤S في حين أن الصيغة‎ 
طبعا في الكود السابق الأعمدة المطلوبة في جملة أعما6؟S هي‎ 
متوافقة مع الأعمدة المدخلة.‎ 


أخطاء مشهورة أثناء استخدام جولۃ 1۸,56٣‏ 


unique constraint 


تعني هناك شرط على حقل بعدم تكرار البيانات وسيظهر 
اسم الحقل في الرسالة بمعنى أنك تحاول إدخال قيمة موجودة من 
قبل وغير قابلة للتكرار. 


Syntax error 


ان هناك حقل رقمي غير موضوع بين كعلامتي تنصيص مفردة او 
اسم حقل من الحقول - كلمة محجوزة اي لا تصلح تكون اسم لجدول. 
كمثال نحن نستخدم جملة |٠50۲)‏ إذن لا يصلح أن نسمي اسم حقل 
باسم الامر |٣٤6٣‏ . 


Er ۴ EE 


meg E, 
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Traffic Monitoring System Model - EE—EDJgiJI jكرولاب‎ jئافلا الوشروع‎ 


أصبح لأنظمة الكومبيوتر الذلية تاثير عميق على حياتنا اليومية حيث أصبحنا نرى كل يوم أبحاث ومشاريع جديدة من أجل 
| "= ار الكومبيوتر "J‏ ۴ الحباة و . 1 bh . . I‏ التي ا | | البسر. 


والمشروع عبارة عن مزيح من اخر التقنيات التي قدمت في هذا الفرع من علوم الكومبيوتر المتعلقة بالرؤية الحاسوبية ونظم دعم اتخاذ 
القرار المقدمة في مجال تطوير المدن الالية ٠‏ حيث يستخدم النظام للمساعدة في عملية المراقبة ٠‏ ازدحام الطرق ومراقبة اشارات المرور 
وتدفق السير في المدن ٠‏ هو عبارة عن نظام لمراقبة السير ودعم قرارات القيادة الذلية حيث أن هذين النظامين لم يتم ربطهها سوية 
من قبل. 


وكل وا نطمح إليہ حالياً هو تقديم خطوة في طريق تطبيق نظام مراقبة في الواقع عن طريق دعمہ للتكامل مع النووذج المستقبلي 
لنظام القیادۃ الالیۃ من خلال نووذج مصغر لمدینۂۃ تحتوي على سیارات يتم التحكم بها عن بعد وتتم إدارتہ من خلال الكومبيوتر. 


تم افتتاح دورة تعلم الدوت نت 20068 


بفضسل اللہ عز وجل تم البدا بدورة تعليمية عن تقنيات الدوت نت القادمة مع الفيجوال ستوديو 2008 و يشارك فيها عمالقة 
الموقع من أستاذة و أعضاء حيث يشارك الجميع بالدروس و المقالات التعليمية المنوعة في عالم الدوت نت 2008. نرجو من اللہ 
عز و جل أن يوفقنا جميعنا لتقديم أفضل ما نعرف لإخواننا المبرموجين على مستوى العالم العربي... وأملنا في اللہ عز وجل أن تمتد 

التجربةۃ و یشارکنا بھا كل من لہ خبرة في مجال تقنيات الدوت نت حتى تعم الفائدة على الجميع e.‏ 
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وشاربع الأعضاء المميزة 
ا 


المراحل الأساسية للمشروع - باختصار شديد - لمزيد من Capturing‏ 
التفاصيل راجع ال «n‏ i0oاھاenم0cum(‏ في اخر الموضوع. 
مقدمة:_ Framing‏ 


أصبح لأنظمة الكومبيوتر الآلية تأثير عميق على حياتنا اليومية 
حيث أصبحنا نرى كل يوم أبحاث ومشاريع جديدة من أجل استخدام 
الكومبيوتر لتسهيل الحياة وتخفيف الضغوط التي يتحملها البشر. 

والمشروع عبارة عن مزيج من أخر التقنيات التي قدمت في | Map Extraction‏ 
هذا الفرع من علوم الكومبيوتر المتعلقة بالرؤية الحاسوبية ونظم دعم 
للمساعدة في عملية المراقبة › ازدحام الطرق ومراقبة إشارات المرور User Eating‏ | + 
وتدفق السير في المدن » هو عبارة عن نظام لمراقبة السير ودعم 
قرارات القيادة الالية حيث أن هذين النظامين لم يتم ربطهما سوية من 


قبل. 
وكل ما نطمح إليه حاليا هو تقديم خطوة في طريق تطبيق نظام 


Initialization 


deslinalion 


Service 


مراقبة في الواقع عن طريق دعمه للتكامل مع النموذج المستقبلي لنظام Initialization , CREE‏ 
القيادة لألية من خلال تموذج مصفر لمدينة ‏ تحتوي على سیارات یتم 


التحكم بها عن بعد وتتم إدارته من خلال الكومبيوتر. Motion Detection‏ 
And Tracking‏ 


الوصاعب الأساسية التي واجهث النظام: 
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مشاريع الأذعضاء المميزة‎ ۰ 


وصف الوشروع: 


باختصار شديد : المشروع يحتوي على كاميرا تقوم بإرسال صور فورية إلى الكومبيوتر الذي يقوم بتحليلها وفهمها والخروج ببعض التقارير 
والإحصائيات عن الطرق ونظام المرور › وفي الجزء الثاني من المشروع وعند بداية مهمة لتحريك السيارة من نقطة إلى أخرى يتم الرجوع إلى 
هذه المعلومات لحساب الطريق الأمثل للتحرك من خلاله » وأخيراً يتم اللجوء إلى بعض مبادئ عناامصهC‏ 1هcنورط"P‏ من أجل تحريك 
السيارة الموديل الموجودة في المدينة المصغرة. 


وسنبداً الآن في الشرح التفصيلي لبعض المراحل باختصار. 
وعالجة | 
الورحلة الذولى في عملية موعالجة الصور هي مرحلة ٣0ناءه۲)×٤ ۸٥24‏ حيث يتم معرفة الطرق الموجودة في المدينة عن طريق مراحل متعددة 


تمر بها عملية استخراج الطرق بعد ذلك يمكن حصرها إجمالا في المراحلJ‏ llتlلıة (Generate Road Seed points, Snaxles, Snakes)‏ 
حيث يتم التعرف في آأخر مرحلة بصورة مفصلة على جميع الطرق غير المستقيمة أو المنحنية بانحناءات متعددة. 


وباختصار شدید فان هذه المرحلة تعتمد على ما يسم ڊlسم Detection‏ مع كمرحلة أساسية في هذه الخطوة حيث نقوم بقراءة الصورة 
ومحاولة استخراج الحواف المميزة لها 

في الخطوات التالية نقوم باستبعاد تلك التي تمثل مباني متلا أو ناتجة 
عن تشويش في الصورة» نقوم بدمج الخطوط سوية ... الخ. 
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وبما أن الناتج لن يكون بالطبيعي %100 فإننا نسمح للمستخدم 
بالانتقال ا ناك رسم الطرق والتعديل حيیث یمکنه إضافة وحذف 
الطرق الخاطئة كما يمكنه تسمية الشوارع والمباني وغيرها... 
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الورحلة الثانية في عملية معالجة | 

هي متابعة تحركات السيارات في المدينة › ويتم ذلك أيضا عبر 
مجموعة من العمليات الخاصة بكيفية استخراج خلفية فارغة من جميع 
السيارات دون الإضطرار لتصوير المدينة وهي فارغة › ومن تم 
البدء في قراءة الصورة عن طريق الطرح المباشر كخطوة أولى » 


وهذه مجموعة من الصور: 
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الخطوة التانية تعتمد على البدء الفعلي فی قراءة اللصور ویتم ذلك عبر تحويلها إلى صور Bi1۷‏ مع تطبیق بعض ال morphological‏ 
ع teri"‏ من اجل توضيح الصورة › وهذه المحصلة النهائية لهذه العمليات: 


الخطوة الأخيرة هي البدء بتتبع هذه السيارات فترة عمل النظام « ويتم ذلك بlستخدlم LUCAS-KANADE OPTICAL FLOW‏ 
GOR THM‏ على سبیل المثال. 


نظام الإحصانيات والتقارير القيادة الاليۂ: 


بعد أن استطعنا في المرحلة السابقة معرفة أماكن السيارات في المدينة وحالة الطرق › جاء دور المرحلة الثانية من النظام والتي تتلخص في 
الاستفادة من هذه البيانات » وتتم الاستفادة من هذه البيانات بطريقتين: 


۳ : نظام الإحصائيات والتقارير:_ 
b4 C‏ ۳ 


Fa b.COomM 


حيث يتم عرض تقرير فوري بحالة الطرق ونسب الازدحام وخلافه. 
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وشاريع الأعضاء المميزة 


نظام القيادة الاليۃ: 
وهذا هو الجزء الثاني من المشروع › حيث 
يتم كبداية تحديد مهمة للانتقال من نقطة أ إلى نقطة ب 


أول العمليات التي يتم تنفيذها هي حساب ال یع8 
طtوPعن‏ طريق معادلة لكل طريق يتم من خلالها 
اختيار الطريق الأنسب وبدء العمل على تحريك 
السيارة من خلاله. 

والآن ننتقل إلى الجزء الآخر » وهو كيفية تحريك 
السيارة 2 هذا المسار ¢ فعلی الجانب الأول هناك 
بعض الأمور الخاصة بالالكترونيات والتي سنناقشها 
في النقطة التالية » أما الجزء الخاص بالمعادلات فهو 


Road Stabs (weight) موضوعنا هنا.‎ 


حيث أنه طوال فترة حركة السيارة فإنه يتم عمل العديد من المعادلات الرياضية من أجل ضمان حركة السيارة ضمن الطريق ٠‏ الالتفاف في 
الملفات المحددة لذلك › التأكد من وجود مساحة كافية للتحرك إلى الأمام > وضمان عدم الاصطدام بالأجسام المحيطة. 


lلھlردıgير: HardWare‏ 
كما أسلفنا في النقطة السابقة › فإنه تلزمنا بعض التعديلات ليصبح بمقدورنا تحريك السيارة الموديل عن طريق الكومبيوتر. 


بداية استعنا بسيارة ريموت کنترول RC Car‏ مع مراعاة وجود أكثر من تردد Frequency‏ کی حالة استخدام أكثر من سيارة أو استخدام 
sئcrystaاو Strips‏ eاRemovab‏ من أجل تجنب تداخل الموجات. 


ثم قمنا بعمل موديل لمدينة مصغرة وقمنا برسم بعض الطرق وبناء بعض المباني كما هو موضح في الصور المرفقة. 
وقمنا باستخدام كاميرا عادية لالتقاط الصور. 


المرحلة الذولى هي ربط الكاميرا بالكومبيوتر › وتم ذلك عبر منفذ 088 حيث يمكن قراءة الكاميرا بأكثر من طريقة وحسب لغة البرمجة 
المستخدمة. 


الخطوة الثانية هي ربط الريموت بالكومبيوتر ليتم التحكم في السيارة › ويتم ذلك عن طريق استخدام مبادئ ال وره1ه۸ والتي تسمح للتيار 
بالمرور في الريموت عند تلقي أمر معين من الكومبيوتر من خلال منفذ الطابعة. )۴0۲ 1عPaa11‏ 


وهاتين الصورتين توضحان الفرق بين الريموت العادي حيث يتم تحريك صفائح على بعضها مقارنة بالريموت الجديد حيث أصبح ال رهإامR‏ هو 
المتحكم في توصيل الكهرباء. 


Controller 
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المشروع الفائز بالوركز ا 


وشاريع الأعضاء المميزة 


التطبيق في العالم الواقعي: 

لکي يصبح هذا النظام قابا للتطبيق في أرض الواقع وعلى مدينة حقيقة فإنه ما زال بحاجة إلى بعض التعديلات »› نوجزها في الثلاث نقاط التالية: 
۔- من جھہ وعالجہ الصور : 

سيتم استبدال الكاميرا بصور مباشرة للأقمار الصناعية مثل طا٤إة٤‏ 1ءع٥٠6‏ والتي بدأت تقدم خدمات بث مباشر لبعض المدن حول العالم. 

أيضاً لا زلنا بحاجة للمزيد من التسريع والدقة في عمليات معالجة الصور > أيضا لمزيد من الفلترة للمؤثرات الجوية الخاصة مثل الغيوم › 
الأمطار ... الخ. 

- من جهة نظام قيادة السيارة 


لن يتحمل السيرفر وحده عبء القيادة بل سيكون هناك جهاز على السيارة أو إم[1ه)رمعهإء" يستقبل المسار ويبداً في توجيه نفسه بنفسه 
el BoE TO,‏ 


أيضا سيتم استخدام دوائر کهر بائية مثل ut) ra-S0N1C‏ حتىی ٥‏ فى الموديل الصغير لتلافي الاصطدامات ائ نح عن أجسام مفاجئة حيث تقوم 
I CG O a E aS‏ 
التي ترسل بها الموجات. 

جھۂ نظام الا الاتصا 
لن يتم الاتصال عبر موجات Radio‏ عادية بل لا بد من وجود )ا0 ساعد ءوع 1م۷۲ ۰ والشرط الأهم هو كونها محمية وهو مالم ت تتو صل اليه 
البحوث حتى الآن حيث لا توجد شبكة لا سلكية محمية بصورة كاملة أبداً. 


ومن الجهة الأخرى فنحن بحاجة إلى تطويع هاردوير السيارات لاستقبال أوامر عن طريق الكومبيوتر وهو ما لا يعد مرحلة صعبة من ناحية 
التطبيق › ولكنه سيواجه مشاكل عديدة تنتج عن سرعة السيارة متلا متلا وسرعة الاستجابة للأوامر في ظل سيرها على سرعات كبيرة والتوقف 
المفاجئ وتوقع الأعطال وغيره. 


المسروع: 


تم تسليم المشروع باستخدام #© ولكن بداية العمل في المشروع لم تكن كذلك » حيث تم استخدام 1۸114۴ نظراً لكونه الأسهل في التعامل مع 
ال Image Proccessing‏ ( ومن تم تم ربطه بالنظام الذي قمنا بعمله من خلال ٥#‏ ولكن وبالرغم من ذلك فلن تجد اللغة المستخدمة تفرق كثيراً 
حيث أن أغلب البرنامج عبارة عن معادلات وقوانين لن يختلف تطبيقها من لغة إلى أخرى أبداً. 


وللتحويل إلى C#‏ تم استخدام ۷٣۲عمإ2ط؟‏ وهي مكتبة مفتوحة المصدر متخصصة في عمليات ال ع«اوععءعهإ۲۴ معمص] وهي عبارة عن 
Warrper‏ لمكتبة ۷٣١عم0‏ التي تم تصميمها للعمل على C++‏ » وسبب الاستعانة بهذه المكتبة هو التعقيد الكبير الذي سينتج عن استخدام 
أكواد سي شارب مباشرة في كل عملية من عمليات معالجة الصور التي نستخدمها نظراً لأنك ستضطر للتعامل مع المؤشرات ءإم) مزه" وهو ما 
يضطرك لاستخدام علهء عfهومرن‏ » وبصراحة فهي لا تعطيك كافة المميزات التي تقدمها لك لغة مثل K++‏ وفي نفس الوقت تحرمك من 
السهولة التي تجدها في الماتلاب. 


ولكن هذا لم يمنع استخدام أكواد مباشرة في كثير من الأحيان » وإنما تم استخدام ۷٣۲ءم2ط؟‏ فقط في العمليات المتكررة أو التي يتم التعامل فيها 
مع كمية كبيرة من الأكواد حيث تختصر عليك ال ۲۳۷ءمإ2ط؟ جزء كبير من المهمة برغم كثرة مشاكلها » ولكنك ستجد نفسك مضطراً في 
النهاية للبرمجة اليدوية. 


كان بالإمكان إضافة حل آخر وهو استخدام عمليات التحويل من ماتلاب إلى أع1. ولكن ظهور بعض المشاكل أدى إلى ايقاف هذه العملية » عموماً 
ما زالت جميع مراحل العمل على معالجة الصور موجودة من خلال مهااهص ومن خلال C#‏ أيضا. 


لاک اک الخاص بالنظام والشاشات والقيادة الآلية ومعادلات الحركة والربط بالكاميرا من جهة أو الربط بالسيارة من جهة أخرى وعمليات 
12A 1b .rarm‏ 
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لقطات وصور من الومشروع: 


لقطات وصور من البرنارح: 
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ومسابقة ال ۸٨KM‏ التانية: حساب مجموع لعبة البولينج 
السلام عليكم ورحمۃ اللہ وبركاتہ.... 

جميعنا يعرف لعبة البولينح المشهورة ٠‏ والكثير هنا جرب لعبها من قبل ٠‏ والكثير أيضا يعرف 
القواعد الخاصة بها ... ولكن لا مانع من إعادة التذكير بهذه اللعبة مرة أذرع. 
- تعتمد اللعبة على وجود كرة يتم بواسطتها إسقاط عدد 10 من ال ۲1١5‏ . تتكون اللعبة الواحدة 
من عر رميات ٠‏ وع كل رمية هناك محاولتان لإسقاط جميع الكرات. 
- فیہا لو سقطت جمیع ال 10 5٣م‏ من المحاولۃ الذولى لا يتم اللجوء للمحاولۃ الثانيۃ ويرمز للعبةۃ 
با ×. 


اعداد 


أحمد جوال 


سيتم البدء في إعلان مسابقةۃۂ شهرية لأفضل 

موضوء /وقال /درس خلال الشهر ٠‏ يتو تكريو صاحب المقال 

بوكافاة روزية قدرها 100 ريال سعودي والباب مفتوح 

لجويع الأعضاء والوشرفين وكبار الشخصيات ها عدا الوشرف 

العام ۰ آول جائزة ستونح عن شمر ینایر إن شاء اللہ ويتر 
i‏ قفل باب المشاركات يوم 26 من الشهر لفتح الباب 
للتصويت لمدة يومين والذى سيشكل 20 من نتيجة 
المسابقة ٠‏ فيما تخضع ال 80 المتبقيةللجنة تحكيم . لا 
يشترط أي مجال للمقال الفائز كل شمر . 


المسابقات السهرية لموقع فيجوال بيسك للعرب و نتائجها 


ہیں قسم وسابقات الونتدی 


س 
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مسابقة ال۸۳ العالمية الجامعية للبرمجة. 
المسابقة الإقليمية السادسة للدول العربية و دول شمال إفريقيا. 
جامعة الكويت » كانون الأول / ديسمبر 2003. 

عربي 


لسرن 
نقول عن عددان طبيعيان عشريان - من دون بادئة 0 - أنهما 
مان اوفط كا مان شن ادد من ارقاو نش فا 
توزیع الأرقام في المواضع دون الأخذ في عين الاعتبار قيم الأرقام. 
كأمثلةء الأرقام التالية متماثلة مثنى مثنى: 12156» ٠73748‏ 
0 48412 لأنه في كل عدد من الأعداد السابقةء الرقم الأول و 
الرقم الثالث (من اليسار إلى اليمين) هو نفسه بغض النظر إن كان هو 
نفسه قن الاعداد الاخرى و نس الشيء لبقية الارقام الى تشغل 
المواضع المتبقية. الأعداد التالية أيضا متماثلة 237392» 578715› 
3 . أما هذه الأعداد فليست متماثلة: 222 »545 +776 811 
“06. 
ا e‏ کمٹال» خد جمیع الأعداد التي لها الطول 2 ell‏ 
22 33» ۰44 55 ۰66 ۰77 ۰88 99 هي تشکل مجمو عة اعو0؟] 
عدد عناصرها (أصلي المجموعة) = 9 إذا أخذت أي عدد مهما کان 
طوله فانه ينتمي إلى مجموعة أعءمء] وحيدة. 
تريد شركة أن تقوم بتصنيف زبائنها إلى مجموعات باستعمال 
خاصية الأعداد المتماثلة» كل زبون معرف بمفتاح أقل من 
0 حيث كل زبونين ينتميان إلى نفس المجموعة يكون 
لهما مفتاحين متماتلين أي ينتميان إلى نفس مجمو عة الأعداد المتماثلة. 
الشركة تريد منك كتابة برنامج يقوم بأمرين: 
1. معرفة إن کان عددان كيفيان متماثلان أو لا. 
2 أعطيته غد کيفي» فانه يعود لك بعدد عناصر isosetdl‏ الذي 
ينتمي إليها. 
نسق ادخال الببانات: 
البرنامج يقبل قائمة من أمر أو أكثر» كل أمر يكون مكتوبا في 
سطر مستقل» الأوامر المحتملة هي: 
VERIFY x y :‏ لnعرفة‏ إن کان العددان متماثلان 
: > #۴]طباعة عدد عناصر المجموعة التي ينتمي إليها العدد 
: 7 لخروج من البرنامج 
جميع الاوامر تكتب بالاحرف اللاتينية الكبيرة. 
ت الهذا 
بالنسبة للامر ر × ۷8۸1۴۷ سيقوم برنامجك بطباعة سطر بالتنسیق 
التالي: ااuوع]‏ [ءءهمء].) حيث k‏ هو رقم السطر في قائمة 
المدخلات» [عءهaمء]‏ مسافة بيضاء و ااuوم]‏ هي النتيجة و تكون 
عru)‏ إن کان العددان متماثلان وإلا عیله]؟. 
بالنسبة للأمر »× S17۴‏ على برنامجك طباعة سطر بالتنسيق التالي: 
[ceهaمpء].)‏ حيث ء هو أصلي (عدد عناصر) الاع؟ه؟1. 
المدخلات. 
VERIFY 1121321 5545645‏ 
E‏ 1 
SIZE d1‏ 


A. 
vbêaarab.corm 


نص الوسابقہ 


[إنسالكانا البللدئ 


إعداد محود جمال الدين 
ACM International Collegiate Programming Contest‏ 
Arab and North Africa Sixth Regional Contest‏ 
Kuwait University, December 2003‏ 

کر 

Description 

Two positive decimal integers without any leading zeros will be 
called isomorphic 1f they are composed of the same number of 
digits and same digit-repetition pattern (regardless of the value 
of the digits.). 

For example, all of the following numbers are isomorphic to 
each other: 12156, 73748, 51590, 48412 since in each 
individual number, the first and the third positions are occupied 
by the same digit, and all the other positions have distinct digits 
(which are also distinct from the digit 1n positions 1 and 3). 

The following numbers are also isomorphic to each other: 
237392, 578715, 341453. All of the following numbers are pair- 
wıse not isomorphic: 222, 545, 776, 811, 66. 

The set of numbers that are isomorphic to each other will be 
called an Isoset. For example, the numbers: 11, 22, 33, 44, 55, 
66, 77, 88, 99 form an 1isoset with cardinality 9 (number of 
elements in the set). Any number 1s a member of exactly one 
isoset. 


A company wants to make use of isomorphic numbers in 
classifying Its clients into groups. Each client 1s given a unique 
1d number (a decimal positive number less than 1,000,000,000.) 
Any two clients within the same group are given 1d numbers 
that are isomorphic to each other. The company hires you to 
write a program that will do two things: 

1. Given two numbers, determine 1f the numbers are isomorphic 
Or not. 

2. Given a number x, determine the cardinality of 1ts isoset. 


Input Format 
The program accepts a list of one or more commands. Each 


command 1s specified on a separate line. Possible commands 
are: 

VERIFY x y Test 1f numbers x and y are isomorphic or not. 
SIZE x Print the cardinality of the isoset x 1s a member of. 
QUIT Exit the program. 

Commands are always uppercase words. 


Output Format 
For a VERIFY x y command, your program should output a line 


of the form: k.[space] result 

where result 1s ’ true’ (without the quotes,) 1f x and y are 
isomorphic, false’ otherwise. k 1s the input line number of the 
command. 1s a single space character. For the SIZE x command, 
your program should print: k.[space] c Where c is the 
cardinality. 


Sample Input 
VERIFY 1121321 5545645 


VERIFY LLLL LLL 
SIZE Ll 


م 


مدة المسابقة : يومان و تم تمديدها إلى أسبوع. 


طریفہ التحكيم: یتم اختیار الحل الفائز حسب سر عة تنفيد الشفرة 
تكتب الشفرات باحدى لغات الدوت نت. 


Athman <‘Boutemıine Oualid <‘In4matri1x 


النتانجح: الفائز بكل جدارة الأخ ااه 14ء أحسن حل» أسرع وقت 
تنفيذ و الالتزام الكامل بقواعد المسابقة. 


حل الفائز بالمسابقہ: 


السلام عليكم و رحمة الله و بركاته 
أشكر الأخ محمد جمال و منتدانا العزيز على هذه المسابقات و الحمد 
لله 
الغاية أخواني من هذه المسابقة هي الاستفادة المشتركة للجميع لذا 
سأشرح لكم طريقة الحل: 
دعوني أطرح المسألة بشكل رياضي: 
ليكن لدينا العددين الطبيعيين ر ,× (طبيعيين = صحيحين 

موجبين)» نقول عن العددين أنهما متماثلين إذا كان: 
أ. طول العدد = × طول العدد( ر طول العدد = عدد أرقامه). 
ب. ادا کان هناك رقم متكرر أكثر من مرة في العدد× › فهناك رقم 
متکرر أكثر من مرة في العدد ر و بنفس أماكن الخانات. 
أمثلة: 
2 - 25552 -13331 - 12221 لاحظ أن نموذج الأرقام 
السابقة ھو ۸888۸7“ :مھما کان 8 ,۸ ۰ طبعا شرط أن لا 
يتساويا. 
1 - 2529 - 2528 - 1214 نموذج الأرقام السابقة هو : 
A, B, C jنكڍ lng “ABAC”‏ . 
4 - 2255 - 8899 ليست كلها متماثلة إذ لا يجوز أن نبد أي 
عدد بصفر حسب lلقواعد “without any leading zeros”‏ و Il‏ 
فليست كل الأعداد السابقة متماثلة. 
هناك شيء آخر» جميع الأعداد التي هي متمائلة فيما بينها تشكل 
مجمو عة تسمی)ع؟0؟1] ¢ کما نطلقی علی عدد عناصر هذه المجموعة 
ityاcardina»‏ أمثلة: 
- المجموعة التي طول العدد فيها 3 و نموذج الأعداد فيها من الشكل 

-212-202....141-131-121-101 تتكون من:‎ )AB4( 
989...919-909....313-303....22 
نلاحظ أن هناك تسع أرقام ممكنة مکان الرمز (1..9) ۸ حيث لا‎ - 
العدد بصفر.‎ ETT 5 
81 = 90 اخترناه للرمز ۸ و بالتالي او فو‎ 
)۸8€C۸[( الأعداد فيها من الشكل:‎ 
هناك 9 أرقام ممكنة للرمز ,۸ و بالتالي بقي من‎ 
الأرقام العشرة 9 أرقام ممكنة للرمز التالي.‎ 
8 هناك 9 أرقام ممكنة للرمز ,8 و بالتالي بقي‎ 
أرقام ممكنة للرمز التالي.‎ 


vbaarab.corm 
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[إتسالعانا اليللدئ 


إعداد محمد جمال الدين 
هناك 8 أرقام ممكنة للرمز ,© و بالتالي بقي 7 أرقام ممكنة للرمز 
التالي. 

هناك 7 أرقام ممكنة للرمز ,5 و بالتالي بقي 6 أرقام ممكنة للرمز 
التالى. 

و بالتالي فعدد العناصر الكلي هو: 9 * 9 * 8 * 7 

لاحظ أن کل مجمو عة أ عداد متشابهة لها نموذج pattern‏ معین يدل 
على شكل الأعداد ضمن هذه المجموعة )(A۸B۸A, ۸BCD,‏ 
۷ABB]CAD, A۸۸)‏ و يمكننا معرفة هذا الشكل من كل عدد»ء أمثلة: 
العدد 123 نموذج مجموعته هر ۸8€ 

العدد 1221 نموذج مجموعته هر ۸88۸ 

العدد 125351 نموذج مجموعته هر A۸BC٥(5€ ۸A‏ 

و سنستفبد من هذه الملاحظة لاحقاً.. 


الطلبات : 
1. هل العددان ۷ ,× متشابهان؟ 

ببساطة يمكننا مقارنة نموذج مجموعة العدد الأول مع 
نموذج مجموعة العدد الثاني فإن تطابق النموذجان فالرقمان ينتميان 
لنفس المجموعة و بالتالي هما متشابهان. 


2. وا نتوي لها العدد × ؟ 


عدد عا ع ill‏ 


بعد تحديد نموذج مجموعة هذا العدد يمكننا انطلاقا من هذا 


النموذج حساب عدد عناصر هذه المجموعة كما شرحنا سابقا.. 

و بهذا نكون قد حللنا المسألة و إليكم الكود علما أني كتبته بالسي 
شارب - و لكن لا تجزع فيمكنك قراءته و فهمه إذا كنت تعرف 
فیجوال بيسك دوت نت فقط حاول و ستری! 

و من لديه سؤال أو تصويب فأنا جاهز.. 

تحياتي 

محمد ×۲1 )1۸412 


الأخ ولید بوالطمین idاھu٥‏ ٥٣ہ‏ ع†ںہB‏ لم یعتمد على 
طرف افر قات الم تة في حل فار تل انتمل طرة تراد 
جمیع الأعداد الت تنتمى إلى ال†عءهء| الخاص بالعدد المطلوب و 
من ثم يقوم باستعمال e‏ و يقارن جميع الاحتمالات مع العدد 
باستعمال التراجع أو الدوال التردادية Recursivity‏ و هي طريقة 
بطيئة جدا جدا حيث إذا قمنا بحساب تعقيدها ×|†y‏ عام هع سنجده 
على الأقل: طول العدد ضرب 9 احتمالات بالإضافة إلى أوامر 
التحكم الشرطية التي تضيف تعقيد آخر بينما حل الأخ in4matrix‏ 
تعقيده أقل بكثير 9 احتمالات على الأكثر + عدد الأوامر العنصرية 
البسيطةء تم تقديم حل الأخ idا0ua‏ ع”اصعBout‏ باستعمال لغة 
ا ارب 


بالنسبة للاخ ۸۸۲۳٣۵٣‏ لم تتوفر لدی فريق تحرير له 
مات کا ر ف کے حه اعمال الجرال بك ف ف 
نے 


™ 
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تسابقات المنندى 
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إعداد محمد جمال الدين 
الشفرة الوصدرية للحل الفائز بالمسابقةۂ 


7/7 ISOMOEDHNICNUMGDEESCS 
using Systen; 
Using SVSsSLem. IO; 
namespace MohammadHi1.VB4Arab.Contests { 
DUCLIILT CLASS LISOMOEDOTLCENUMGEES 
private StreamReader i1input; 
private StreamWriter output; 
private bool stopFlag; // stop execution 
PUDLIG ISOMOEGRLCNUNOEFES (SEEING INPUEFILLEPAEN, SETING OOCPDUEELLEFAERY 
executeBatch (inputF1l1lePath, outputFilePath); 
} 
// Summary: returns 'true' if 'numberl' and 'number2' are members of the 
same 1isoset. 
4 


pFITVaALe DOOL 1SLSOMOIPRIC (SEEING NuUmMmbeErFL, SIEING hnuUmMberF2) 


LF (numberl.Length != number2.Length) 
return false; 
char nextMask = 'A'; 
CHAE] CiGITMaSkSl:= mew CRAPO; 2F UNG alk TOE Gch oL 


char[]| digitMasks2 = new char [10]; 
TOF (DE 1 = O; 1 KS THUOMDEELS LENGER; TLE 
INE OLTLEEL 2 OM ELL, = OT; 
INL. OIGILZ = NUMNDOEZ LL] = I, 
LE (QigGitMaskKSs1 [QdiGIEL] 1= digitMasks2 [digitE2|) 
return false; 
1f (digGitMasks1l [digitl]|] == '\0' && digitMasks2 [digit2] = N0") { 
// we see these digits for the first time 
digitMasks1 [digit1] = nextMask; // assign a mask to 
EN 
diGilLMaskKSA2IdIGIE2| = hextMask, 7/7 assign the same mask Lo 
OT 
MEX TMaASCEE, 


} 
TET UT CEU, 

} 

/ 7 SUMMA: 

//êalcllatées the Gardi nalitvy, WICC 16 Ehée number of elements ih LHo oot 

//witch 'number' is a member of. 

hE lt HELINE OE DO CEC Go LICE TÎ 

JERE ANC OLSEIRNCE OQIGIE Ho FT OOGSIBLIILIES TEOM O; 

E6 FEO OSI REE OE NAE FG COG BIIIEIESS TEE (O; 

Lhe ACM COLISTINCE OLO E TT DOC TULLILILES TET O 

sos OM 6 O 

GFIvVaTS INT CaLCCaAEIINALILEY (SEEING _NUMBEFE) { 
bool[] digitSeen = new bool [10]; 


>» 
>» 
>» 
> 


د 
د 
د 
د 


د 


نم یم یم نم 
د 

DRDE 
د‎ 
د‎ 

o - © 
د‎ 

ت ل که 
د 

د 
د 

GO 6 


>» 
>» 
>» 


4 


LAE CIAFQOLRELLEY =1; 
LUE OOSSIDLENUMDEES = OE FE Oy lp aa O Ol 
TOF (IRE 1 SO; lL € HOME. LENGE, CE 

LIL QOIGLL = NUMDEEFLL] = OT, 


1f (!digitSeen [digit]) { 
// we see this digit for the first time 
dIGITSeen[QALIGIT] = CEU; 
IE (i == OF GOFOINALILEY = GOSS BIENUMGETS = I J7 ChE 
LLFSL QIGI1L MUSEL BE zZer0U 
else cardinality *= posslbleNumbers; 
possl1ibleNumbers=-=; 


} 


} 


Cel UER CEEIIHALIEY 
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اسابقان الهنندى 


إعداد محمد جمال الدين 


private void executeVerlfyCommand(Stringl[l] args) { 
BOL LIOMOEOHIC = TEISOMOEDhRIC(AEGOSILl; AEOSLAIN, 
output.WritelLine (isomorphic 2? "true" : "false"); 
} 
private void executeSlzeCommand(Stringl[l] args) { 
LNE CaFULRALLLY = GAlCUAEOINALITTAEOSILIN 
OULpUL.WELEeLInNe (cafdinaliEvy) j;j 
private void executeQultCommand (Stringl[l] args) { 
stopFlag = true; 
private void executeCommand (String command) { 
SECILNOLl GES = COMMA. SOLIE OES FO 
switch (command [01| ) { 
tase TV: J77 TVERIFT 
executeVerlifyCommand (args) ; 
break; 
CaS TST: J7 STANT 
executeS1izeCommand (args) ; 
break; 
Caê TOF: J7 TOUT 
executeQultCommand (args) ; 
break; 
} 
BUDLLC TOI execUleBaALCH (SEEING 1nNpULEFLLEPSALh, SLELNGS OUCBUCEFLLEPATCD) 
using (input = new StreamReader (inputFilePath) ) { 
using (output = new StreamWriter (outputF1lePath) ) { 
SEELRT COMMNADG;, 
1nTL LIHNECOUNEEE = U; 
while (!stopFlag && (command = 1input.ReadLine()) != null) { 
output.Write(++lineCounter + ". "); 
executeCommand (command) ; 
OUTPUT. CLOSE 0F 


CLOSE (J; 


//BPEOGEAMN:GS 
using System; 
namespace MohammadH1.VB4Arab.Contests { 
Cl PFEOGOENL 
StLALICG VOILIC Main (SlCEILNGOT] AEG 
NEN LISOMOESDOLCNUMDEES (J EKECUCEBSLCCD(TILRDUL. LKU", FOULGOUCLLEE 


ل | 1 1 ا إا . [ هنا 


هنينا للفائز و في انتخار المزيد من المساركات في المسابقات القادمة 


ا 
vb4aarab.corn‏ 


مسابقة ال ۸۳M‏ التانية: حساب مجموع لعبة البولينج 


اعداد أحود جمال 
يسم الله الرحمن الرحيم. 


السلام عليكم ورحمة الله وبركاته. 


جميعنا يعرف لعبة البولينج المشهورة › والكثير منا جرب لعبها من قبل › والكثير أيضا يعرف القواعد الخاصة بها ... ولكن لا مانع من إعادة 
التذكير بهذه اللعبة مرة أخرى. 


- تعتمد اللعبة على وجود كرة يتم بواسطتها إسقاط عدد 10 من ال وم۴ » تتكون اللعبة الواحدة من عشر رميات › مع كل رمية هناك محاولتان 


- فيما لو سقطت جميع ال 10 وزم من المحاولة الأولى لا يتم اللجوء للمحاولة الثانية ويرمز للعبة ب ×. 

- أما لو تم إسقاط جزء أو لم يتم إسقاط أي شيء في المحاولة الأولى وتم إسقاط الباقي في المحاولة الثانية فيرمز للعبة ب / . 

- لو تم تجاوز المحاولتين دون إسقاط جميع كرات يتم جمع المجموع الكلي لسقوط ال ومم في المحاولتين. 

- لو تم إسقاط جميع الكرات من اللعبة الأولى › فإن المحاولتين القادمتين (الرمية لقادمة بالكامل (يتم احتساب مجموعها وضربه * 2. 

- لو تم إسقاط جميع الكرات من المحاولة الثانية › فإن المحاولة القادمة فقط يتم ضربها * 2. 

- في الرمية العاشرة والأخيرة › يتم احتساب محاولة إضافية فيما لو تم إسقاط جميع الكرات في المرة الثانية › يتم احتساب محاولتين إضافيتين 
فيما لو تم إسقاط جميع الكرات من المحاولة الأولى. 


- إلى الآن » هل هناك مشاكل في فهم قانون لعبة البولينج » هذا الرابط يشرح بالتفصيل قوانين اللعبة » حاول فهم اللعبة جيداً فهذه هي طريقتك 
لحل مشكلة ال... ACM‏ 


http://www.moheet.com/show_news.aspx?n1id=77961 


چ 
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مجلۃ شمريۃ مجانيۃ تصدر عن موقع قيجوال ببسك العرب 


مسابقةۃ ال ۸۳11 التانية: حساب مجموع لعبة البولينج 


شابقات الهنندى 


إعداد أحمد جوال 
الآن سنبداً في شرح فكرة مسابقتناء فكرة المسابقة تقوم على إدخال 

المستخدم لنتائج الرميات وبين كل نتيجة والثانية يضع فاصلة › 

مهمتك هي حساب المجموع الكلي لهذا المتسابق › علما بأن الحد صور الحل خطوة بخطوة للمسألة المتاحة »> ۷ تعني أن عليك الانتظار 
لأي متسابق هو 300 درجة. الرمية القادمة لاحتساب النتيجة - لا تنس فبعض المسائل بها أكثر من 
فترض البيانات المدخلة بالشكل التالي : 21 101/22 10 رميات وكل ما يعنيك هي العشر رميات الأولى فقط. 


E 
هذہ البیانات بال التالي‎ 


البقية وحصل 7 
ا EE mg ggg‏ 
- في الرمية الرابعة : المحاولة الأولى اسقط 2 وفي الثانية 1. = — 


- في الرمية الخامسة : المحاولة الأولى اسقط الجميع وتم احتساب × MO HH mM mM MM‏ 
لم يتم رمي الكرة مرة أخرى. EE EBE EEE ANT‏ 
- فى الرمية السادسة : المحاولة الأولى اسقط 3 وفى الثانية 3. 


CE a OG 
لم يتم رمي الكرة مرة أخرى.- في الرمية الثامنة: المحاولة الأولى‎ > 
/ اسقط 1 و فى الثائية أكمل إسناط اة و خضل .كل‎ 

- في الرمية التاسعة : المحاولة الأولى اسقط 3 وفي الثانية أكمل 
Cm E‏ 

کا این اضافیتین / حصل في الأولى على 1 وفي الثانية على 
2. 

والآن حسب ما تعلمناه من قوانين البولينج سنجد أن النتيجة هي 108 


EEE RE Es 
HE #W 


Go, BD E ME mE 


Wi 


أمثلة على بيانات أخرى للإدخال: 101/22×X33×1/3/‏ 


ا 
| 


1/X80 
a 121 ٠ النتبجة‎ 
ا ااا‎ 101/22 ×X33×1/3/1/ 8/9 بيان آخر:‎ 
2 واش‎ X "E 120 : النتي لنتيجة‎ 
× E LEI 2 66 والآن إلى مهمتك الحالية » مهمتك الآن هو طلب البيانات من إ‎ 


المستخدم» سیتم ادخال سلاسل نصية بالشکل السابق کی يتم ادخال 
کلمة ۲م0۷ عصه٥‏ ۰ عندها ستتوقف عن طلب البيانات وتبداً في 
إاجراء العمليات قم بتقطيع النص حسب النتائح رقراءء البيانات ومن 
ثم حساب المجموع › لا تنس أن تقوم بذلك بأقصر طريقة وبأقل 
استهلاك لموارد الجهاز. 

کے انار الارن ٠‏ نے مها کل بردي رر نی 


A-Gamal@windowslive.com 


سيکون تقییم المسابقة معتمداً لی سر عة التنفيذ الأساسي وقلة 
الد حمل لاحات وخانة مر في السات ولك الاساس 
سرعة تنفيذ الكود» ينبغخي فصل الواجهة عن التنفيذ في حالة عمل 
واجهة حتى لا تؤثر على سرعة التنفيذ » أو عمل نسخة للحل فقط 
ونسخة للواجهة > تشترط المسابقة أن يتم قراءة البيانات من ملف 
ولیس TextBox‏ مباشرة ولكننا سنتغاضصی عن هذا الشرط مع 
هوقو اءة من الملفات بالطبع, 

کک 


vbêarab.corm 


اإنسالكالا الايللدئ 


إعداد أحمد جوال 


مسابقة ال۸۳ الثانية: حساب مجموع لعبة البولينح 


المسالة باللفة الانجليزية - مسايقة ۸٥۳0‏ لعانم 1997 


Rules 


A single bowling game consists of ten frames. The object in each frame is to roll a ball at ten 
bowling pins arranged in an equilateral triangle and to knock down as many pins as possible. 


For each frame, a bowler is allowed a maximum of two rolls to knock down all ten pins. If the 
bowler knocks them all down on the first attempt, the frame is scored as a strike. If the bowler 
does not knock them down on the first attempt in the frame the bowler is allowed a second attempt 
to knock down the remaining pins. If the bowler succeeds in knocking the rest of the pins down in 
the second attempt, the frame is scored as a spare. 


The score for a bowling game consists of sum of the scores for each frame. The score for each 
frame is the total number of pins knocked down in the frame, plus bonuses for strikes and spares. 
In particular, if a bowler scores a strike in a particular frame, the score for that frame is ten plus 
the sum of the next two rolls. If a bowler scores a spare in a particular frame, the score for that 
frame is ten plus the score of the next roll. If a bowler scores a strike in the tenth (final) frame, the 
bowler is allowed two more rolls. Similarly, a bowler scoring a spare in the tenth frame is allowed 
one more roll. 


The maximum possible score in a game of bowling (strikes in all ten frames plus two extra strikes 
for the tenth frame strike) is 300. 


Input 
The input will consist of a sequence of bowling game scores. Each line will contain the scores for a 


single game, with the scores for each roll of the ball separated by a single space. The score for a 
single roll will be represented by a single character -- either a number indicating the number of pins 
knocked down, a '/' for a spare or a 'X' for a strike. 


The end of input is indicated by a single line containing the text Game Over (terminated with a 
newline). 


Output 
Your program should output the total game score for each game in the input file. The game scores 


should be left justified and each score should be printed on a separate line. The order of the scores 
on the output should correspond to the order of the games on the input. 


Sample Input 
101/22X33X1/3/ X12 
101/22X33X1/3/1/ X80 
101/22X33X1/3/ 1/8/9 


Game Over 


Output for the Sample Input 


108 
121 
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120 
مجلۃ شمرية مجانيۃ تصدر عن ووقع فيجوال سا اعرا ا 


سيتو البدء في إعلان مسابقة شمرية لنفضل 
ووضوع /مقال/درس خلال الشمر ٠‏ يتم تكريمٍ صاحب 
المقال بوكافاة رمزية قدرها 100 ريال سعودي 
والباب مفتوح لجميع الأعضاء والمسرفين وكبار 
الشخصيات وا عدا المشرف العام ٠‏ أول جائزة ستمونح 
عن سھر ینایر إن سشاء اللہ ويتو قفل باب 
المشاركات يوم 26 من الشمر لفتح الباب للتصويت 
لمدة يومين والذى سيشكل 20 من نتيجة 
المسابقة . فيما تخضع ال 60 المتبقية للجنة 
تحكيم . لا يشترط أي مجال للوقال الفائز كل شمر . 
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